轉自WO韓老師講Office
RD長文檔中，經常含有很多表格。有時候，我們需要把這些表格删除。當然，我們可以一個一個的選中再删除，但，如果你的文檔中的表格很多，或是表格位置不固定，這種逐一删除的方法顯然不可取。
今天韓老師給一段代碼，能一次删除文檔中所有表格。
實現方法
韓老師随便建一個有很多表格的文檔：
表格的格式不一、内容不一。
現在我們來一次删除這些表格。
第一步：按[Alt] F11，打開VBA窗口代碼；
第二步：在VBA窗口中輸入以下代碼：
Sub Removetables()
Dim oTable As Table
For Each oTable In ActiveDocument.Tables
oTable.Delete
Next oTable
End Sub
如下圖：
第三步：運行代碼，所有的表格，不管格式如何、有無内容，都可一次删除，如下：
注意事項
1：帶有VBA的文檔保存：
保存時，會彈出如下提示：
此時，一定選擇“否”，然後，選擇保存位置與保存類型。
帶有VBA的文檔一定要保存為“啟用宏的文檔”*.docm“，否則宏會丢失。如上圖：
2.如果你的電腦中按”[Alt] F11“打不開VBA 窗口，則可以在”文件“菜單中選擇”選項“，在"Word選項”窗口中的“自定義功能區”中勾選“開發工具”，如下圖：
在“開發工具”菜單中，最左側即是“visual Basic"，如下圖：
更多精彩资讯请关注tft每日頭條，我们将持续为您更新最新资讯!
zpostcode 
Recruit 
weather 
mreligion 
Yellowpages 
sport 
constellation 
shopping 
name 
game 
directory 
literature 
Word 
tour 
furnish 
Lottery 
tftnews 
lyrics 
News 
digital 
car 
dir 
Edu 
Finance 
