如题所述
假设 Word 文档中有这样一个表格
Word VBA 参考代码:
MsgBox ActiveDocument.Tables(1).Cell(2, 1).Range.Text
End Sub
运行效果:
温馨提示:答案为网友推荐,仅供参考
第1个回答 2016-11-10
dim mystring as string mystring=sheets(1).cells(1,1).value 这样就可以了。 觉得有帮助就采纳吧。