fieldset{padding:10px;}
VBA 为什么用VBA打开了二个WORD并打印它们，但实际上只打印了第一个WORD，谢谢PrivateSubCommand1_Click()DimApAsWord.ApplicationDimnewDocAsDocumentSetAp=CreateObject(“word.application”)Ap.Visible=TrueSetnewDoc=Ap.Documents.Add….newDoc.SaveAsApp.Path&”\AAAAAA.doc”Fori=1To3ActiveDocument.PrintOutNextinewDoc.CloseAp.QuitSetAp=Nothing’消灭对象变量SetnewDoc=NothingDimobjWDAppAsNewWord.ApplicationDimobjDocAsNewWord.DocumentDimstrTitleAsStringSetobjDoc=objWDApp.Documents.Add…..objDoc.SaveAsApp.Path&”\BBBBBB.doc”Fori=1To3ActiveDocument.PrintOutNextiobjDoc.CloseobjWDApp.QuitSetobjWDApp=Nothing’消灭对象变量SetobjDoc=NothingEndSub——解决方案——————————————————–是newDoc.PrintOut和objDoc.PrintOut。自己试试不就行了，还来问。一个人的天地是冷得连呼吸都会寂寞的颤栗，而麻烦，
