2011-09-19 100 views
0

我想從Excel中搜索Word文檔並查看是否可以找到表格以及是否可以將該表格複製到Excel中。我直到找到它才知道桌子的大小。我將在現有的工作簿中爲該找到的表格創建一個新工作表。從Word複製到Excel

+0

如何找到表格,什麼會識別它? – brettdj

+0

請參閱:http://stackoverflow.com/questions/3567441/extract-data-from-word-document-to-an-excel-spreadsheet/3611739#3611739進一步提示 – MikeD

回答

1

以下是如何遍歷word文檔中的每個表格的方法。弄清楚你想如何做其餘的事情不應該是一個問題(如果是的話,更新你的問題與你試過的信息等)。你可能需要在Excel中打開一個單詞對象,或者在Word中打開一個Excel對象。

Sub FindTables() 

Dim tTable As table 

For Each tTable In ActiveDocument.Tables 
    tTable.Range.Copy 
    'Do what you wish (.range.copy here used for example only) 
Next 

End Sub