Word VBA宏-居中+粗体+大写文本的第一行

Word VBA宏-居中+粗体+大写文本的第一行,vba,macros,ms-word,Vba,Macros,Ms Word,我试图将文档的第一行文本居中,通常是标题 我能把这条线放在中间 Selection.Paragraphs.Alignment = wdAlignParagraphCenter 但我不确定它是如何选择文件行的,因为我还想将标题设置为粗体和大写 Selection.Font.Bold = wdToggle Selection.Font.AllCaps = True _ 还有一种方法可以检测任何已经居中且在其上下都有空空行的文本,或者这太难实现吗?使用with语句应用多种格式。以下是一个例

我试图将文档的第一行文本居中,通常是标题

我能把这条线放在中间

    Selection.Paragraphs.Alignment = wdAlignParagraphCenter
但我不确定它是如何选择文件行的,因为我还想将标题设置为粗体和大写

Selection.Font.Bold = wdToggle
Selection.Font.AllCaps = True
_


还有一种方法可以检测任何已经居中且在其上下都有空空行的文本,或者这太难实现吗?

使用with语句应用多种格式。以下是一个例子:

With Selection
.Paragraphs.Alignment = wdAlignParagraphCenter
.Font.Bold = wdToggle
.Font.AllCaps = True
End With

啊,好吧,这是有道理的。我试图弄明白为什么它不选择任何已经居中的文本,因为我想改变这一点。这不会选择任何居中对齐的文本吗?-Selection.Find.Style=wdAlignParagraphCenter@Bp944如果我是你,我会提出一个新的截然不同的问题,关于迭代word文档以不选择居中文本。你可能因为在一个问题中问了两个问题而被某人投了反对票。不过,使用我提供的with方法,将使迭代格式设置更容易。感谢您的帮助,我将继续写一篇新文章。