我正在尝试编写一个宏来将悬挂缩进应用于选择中的所有段落,相对于第一行。
该宏需要处理多个不同的段落,包括未编号的段落,以及具有不同缩进的不同级别的 ListNum 段落。
Selection.ParagraphFormat.TabHangingIndent 1
仅在选择相同类型的段落时才有效。
如果所选内容包含不同的段落缩进,则所选内容中所有段落的缩进将更改为与所选内容顶部的段落相同。
有没有办法在不移动段落位置的情况下缩进第一行下面的行?
我在网上找不到答案。
我需要格式化(隐藏)以某个单词开头的所有段落。我用过查找替换
'----set replacement format
Selection.Find.Replacement.ClearFormatting
With Selection.Find.Replacement.font
.Size = 9
.Color = wdColorTurquoise colour
.Hidden = True
End With
'----"COMPARE" AT START OF LINE
With Selection.Find
.text = "^13Compare: *^13" 'TODO: need to apply format to PART-exclude 1st para mark!
.Replacement.text = "" 'keeps original string, just applies repl format to it
.Forward = True
.Wrap = wdFindStop
.Format = True
.MatchCase = False
.MatchWholeWord = False
.MatchAllWordForms = False
.MatchSoundsLike = False
.MatchWildcards = True
End With
Selection.Find.Execute Replace:=wdReplaceAll
要找到它们,我必须搜索"^13String*^13"
, 以避免在其他地方出现相同的字符串。
但是如果我隐藏整个 find 字符串,前一段末尾的段落标记就会丢失。
除了第一个 ^13 之外,有没有办法更改所有内容的格式?
在过去的几年里,某个法律搜索页面中的链接停止工作。它们不可点击。
这与在 Firefox 中不起作用的 Yahoo 回答链接有关,但我从未使用过那里提到的附加组件。