Add Formatted Text to a Word Document
2016-02-19 09:25
生活已是百般艰难,为何不努力一点。下面图老师就给大家分享Add Formatted Text to a 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()
