我有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
这样做的正确方法是什么?
此致 谢卡尔
答案 0 :(得分:2)
这对我有用:
objselection.Paragraphs.Alignment = 3
编号:
3 Justify 2中心 1右对齐
答案 1 :(得分:0)