Word 信头生成宏不会一致地应用格式

Posted

技术标签:

【中文标题】Word 信头生成宏不会一致地应用格式【英文标题】:Word letterhead generating macro does not apply formatting consistently 【发布时间】:2011-08-29 03:55:28 【问题描述】:

我使用的是 Microsoft Word 2010,我尝试为信头创建的每个宏都不起作用。运行宏时未显示我的文本格式!大小发生变化,但粗体不适用。奇怪的是,每次我在同一个文档或不同文档中运行宏时,它都不会显示相同的内容。

我想要一个像这样的信头宏(第一行应该是 16,第二行是 10,最后两行是 12):

特纳父子公司会计私人有限公司

ABN:22 333 111 555

2000 年悉尼国王街 22 号

电话:(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

【问题讨论】:

【参考方案1】:

是否只是“粗体”不一致,如果是由于您的“Selection.Font.Bold = wdToggle”行,请将其改为“Selection.Font.Bold = True”

然后,您可以在末尾添加“Selection.Font.Bold = False”,以便以标准字体继续。

亚当

【讨论】:

以上是关于Word 信头生成宏不会一致地应用格式的主要内容,如果未能解决你的问题,请参考以下文章

word2010自动生成目录后会有淡蓝色的边框,怎么去掉啊

根据 Excel 使用宏在 Word 中创建条件格式

word使用宏定义来统一设置图片大小

word编辑过程中格式突然变了,上一页和下一页的不一致怎么办?

Excel 为啥总说打开的文件的格式与文件扩展名指定的格式不一致

第四讲