Word - 另存为对象

时间:2015-07-06 20:57:34

标签: vba ms-word save word-vba

如何将Word文档另存为表格中的值?我试过这个并得到了#34; Type mismatch"错误:

Sub saveas_cell()
    ActiveDocument.SaveAs FileName:= _
    "c:\mydocuments" ActiveDocument.Tables(1).Cell(1, 2) & ".doc"
End Sub

我还尝试过对象引用(activedocument.table1.("text3")

感谢您的帮助!

1 个答案:

答案 0 :(得分:0)

您收到错误消息,因为Table.Cell不返回字符串,而是返回单元格对象。相反,使用这个:

"c:\mydocuments" ActiveDocument.Tables(1).Cell(1, 2).Shape.TextFrame.TextRange.Text & ".doc"

您可以找到更多信息here