Private Sub 命令0_Click() Dim WkWord As New Word.Application Dim WkDoc As Word.Document Set WkDoc = WkWord.Application.Documents.Open("c:my documents文档.doc") WkDoc.PrintOut False WkDoc.Close WkWord.Quit End Sub 在printout后面加上FLASE,会等打完之后再关闭。 [ 查看全文 ]
如果您工作中经常要跟 Word 文档打交道,时不时的您可能需要将多个 Word 文档合并为一个。信息量少的时候,我们可以直接使用复制粘贴。除此之外,还有没有其它办法呢? 借助word2010/2007插入选项卡,也可以巧妙地实现文档的合并。 找到对象,按一下它旁边的小三角,从下拉菜单中单击文件中的文字。 接着,选择要合并到当前文档中的文件。您可以按住Ctrl键来选择不止一个文档。(注意:最上面的文档...[ 查看全文 ]