我正在使用Microsoft Word 2010,我尝试为信头创建的每个宏都不起作用。运行宏时,我的文本格式不显示!大小更改,但粗体不适用。奇怪的是每次我在同一个文档或不同的文档中运行宏时,它都不会显示相同的内容。
我希望信头宏像这样(顶行应该是16,第二行是10,最后两行是12):
Turner and Sons Accouting Pty Ltd
ABN:22 333 111 555
22 Kings St,Sydney 2000
电话:(02)9675 4444传真:(02)9675 4443
该文字的代码是:
Sub Letterhead()
'
' Letterhead Macro
'
'
Selection.TypeText Text:="Turner and Sons Accounting Pty Ltd"
Selection.TypeParagraph
Selection.Font.Bold = wdToggle
Selection.Font.Size = 10
Selection.TypeText Text:="ABN: 22 333 111 555"
Selection.TypeParagraph
Selection.Font.Size = 12
Selection.TypeText Text:="22 Kings St, Sydney 2000"
Selection.TypeParagraph
Selection.TypeText Text:="Phone: (02) 9675 4444 Fax: (02) 9675 4443"
End Sub
答案 0 :(得分:0)
是否只是“粗体”是不一致的,如果是这样是由于你的“Selection.Font.Bold = wdToggle”行,将其改为“Selection.Font.Bold = True”
然后你可以在结尾添加“Selection.Font.Bold = False”,这样你就可以用标准字体恢复了。
亚当