Macro to export MS Word tables to Excel sheets
问题 I have a word document with many tables. Does anyone know how to write a macro to export such tables to different Excel sheets? 回答1: Answer taken from: http://www.mrexcel.com/forum/showthread.php?t=36875 Here is some code that reads a table from Word into the active worksheet of Excel. It prompts you for the word document as well as the table number if Word contains more than one table. Sub ImportWordTable() Dim wdDoc As Object Dim wdFileName As Variant Dim TableNo As Integer 'table number in