通过 VBA 更改 Word 文档的段落对齐方式

Question

我有 excel 工作簿，用于维护我的客户数据，例如地址和到期金额。 我正在用 excel 编写 VBA 代码，它将为每个客户生成到期金额的信件。 由于信件的复杂性，我无法使用 mailmerge。 我正在使用以下代码添加段落

Set wrdApp = CreateObject("Word.Application")
wrdApp.Visible = True
Set wrdDoc = wrdApp.Documents.Add
wrdDoc.content.InsertAfter "----------"
wrdDoc.content.InsertParagraphAfter

现在我需要更改段落的对齐方式。 正文中的段落要对齐，而主题行等一些段落要居中对齐。 我试过这段代码，但它不起作用

1.

wrdDoc.Paragraphs(8).Range.ParagraphFormat.Alignment = wdAlignParagraphCenter

还

2.

wrdDoc.Paragraphs(8).Alignment = wdAlignParagraphCenter

这样做的正确方法是什么？

问候谢卡尔

Answer 1

这对我有用：

objselection.Paragraphs.Alignment = 3

数字：

3 对齐 2 居中 1 右对齐

Answer 2

http://www.vbaexpress.com/forum/showthread.php?t=29989