2011-08-29 56 views
2

我正在使用Microsoft Word 2010,并且我尝试为信头创建的每个宏都不起作用。当我运行宏时,我的文本格式不显示!尺寸发生变化,但粗体不适用。奇怪的是,每当我在同一个文档或不同的文档中运行宏时,它都不会显示相同的内容。字母生成宏的信头不一致地应用格式

我想信笺宏转出这样的(顶部线应该在16,在10的第二行,并且尺寸12的最后两行):

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

ABN 22 333 111 555

22国王街,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

难道仅仅是“大胆的”,也就是不一致的,如果是这样,这是由于你的“Selection.Font.Bold = wdToggle”行,而不是改变这种以“Selection.Font.Bold =真”

然后,您可以添加“Selection.Font.Bold =假”到底让你在标准字体恢复..

亚当