Question

平台： Windows和Microsoft Visual Basic 2010 Express

问题：我在Word 2007中制作了Word模板。当应用程序出现时在使用Word 2010的计算机上运行时，SaveAs命令不起作用。它工作正常打开模板并将数据甚至照片添加到模板中的书签。

这是不起作用的语句（vPath包含路径和文件名。）：

oDoc.SaveAs(vPath.ToString)

我尝试过不同的解决方案，但没有任何效果：

oDoc.SaveAs(vPath.ToString, WdSaveFormat.wdFormatDocument)
oDoc.SaveAs(vPath.ToString, 17)  ' WdSaveFormat.wdFormatPDF
oDoc.SaveAs(vPath.ToString, 6)   ' WdSaveFormat.wdFormatRTF

参考文献：

Microsoft Office 12.0对象库
Microsoft Word 12.0对象库

导入声明：

Imports Microsoft.Office.Interop
Imports Microsoft.Office.Interop.Word

Answer 1

我正在使用Office 14并下载了2007模板。以下代码适用于我。

Imports Microsoft.Office.Interop
....
Dim objApp As Word.Application
Dim objDoc As Word.Document
objApp = New Word.Application()
objDoc = objApp.Documents.Open("c:\delme\templateoriginal.dotx")
objDoc.Activate()
objApp.Selection.TypeText("some text")
objDoc.SaveAs("c:\delme\template.dotx")
objDoc.Close()
objApp.Quit()
objDoc = Nothing
objApp = Nothing

您是否检查过您的vPath是否正确？我不确定vPath是什么，但ToString是一种方法，所以你偶然错过了括号吗？

vPath.ToString -> vPath.ToSring()

vb.net保存在Word 2010中

1 个答案: