Add Formatted Text to a Word Document

 更新时间:2007年06月15日 00:00:00   作者:  
Demonstration script that displays formatted data in a Microsoft Word document. 
复制代码 代码如下:

Set objWord = CreateObject("Word.Application")

objWord.Visible = True
Set objDoc = objWord.Documents.Add()
Set objSelection = objWord.Selection

objSelection.Font.Name = "Arial"
objSelection.Font.Size = "18"
objSelection.TypeText "Network Adapter Report"
objSelection.TypeParagraph()

objSelection.Font.Size = "14"
objSelection.TypeText "" & Date()
objSelection.TypeParagraph()



相关文章

最新评论