1. 未雨綢繆，事前準備
　　要解決這個問題，第一種辦法是改進一下將行粘貼到目標表格的操作方式。首先顯示出所有的格式標記。選擇菜單“工具→選項”，選擇“視圖”選項卡，選中“格式標記”下面的“全部”。完成后點擊“確定”。在目標表格的末尾添加一個空行，注意不要在這個行輸入任何內(nèi)容。在源表格中，選中要復(fù)制的行所包含的單元格，但不要選中行末尾的結(jié)束標記。然后將選中的內(nèi)容復(fù)制后粘貼在目標表格中，必要時，Word會自動插入新的行，新插入的行總是與現(xiàn)有的行完全對齊。

　　但這個辦法不是任何時候都適用的——如果我們要把粘貼進來的內(nèi)容放入目標表格的其他位置（而不是最后），目標表格中原來的內(nèi)容就有可能會被覆蓋——除非在粘貼之前，我們首先在目標表格中插入足夠的空行，不過這樣做似乎又太麻煩了。

　　2. 亡羊補牢，事后補救

　　我們再來看看錯位表格的事后補救辦法。首先，我們可以利用Word的表格“自動調(diào)整”功能。

　　選中整個錯位的簡歷表格，選擇菜單“表格→自動調(diào)整→根據(jù)內(nèi)容自動調(diào)整表格”。但是腳本之家提醒大家對于某些復(fù)雜的表格，特別是存在嵌套表格的情況下，這種辦法仍不一定奏效。這時可采用“表格→文本→表格”的轉(zhuǎn)換法。選中整個錯位的表格，將整個表格轉(zhuǎn)換成文本。方法是：選擇菜單“表格→轉(zhuǎn)換→表格轉(zhuǎn)換成文本”，出現(xiàn)一個對話框。任選一種表格中沒有出現(xiàn)的字符作為分隔符，點擊“確定”。最后再將文字轉(zhuǎn)換回表格，方法是：選擇菜單“表格→轉(zhuǎn)換→文本轉(zhuǎn)換為表格”，出現(xiàn)轉(zhuǎn)換對話框，選擇剛才使用的分隔符，然后點擊“確定”。

　　3. 一本萬利，單擊鼠標

　　如果經(jīng)常要處理錯位表格，最方便的辦法還是創(chuàng)建一個簡單的宏。通過宏AutoFitAllTables查找Word文檔中所有的表格，對于每一個表格，分別調(diào)用其各個列的AutoFit方法——自動調(diào)整其列寬，最終的效果就是對齊所有行和列。

Sub AutoFitAllTables()

Dim oTbl As Table

For Each oTbl In ActiveDocument.Tables

oTbl.C
olumns.AutoFit

Next oTbl

End Sub

　　打開Word 宏的Visual Basic編輯器，輸入上面的宏，保存。選擇Word菜單“工具→自定義”，轉(zhuǎn)到“命令”選項卡，將AutoFitAllTables宏拖到 Word工具欄上適當?shù)奈恢?，Word自動添加以AutoFitAllTables命名的按鈕。右擊該按鈕，將按鈕命名為“對齊所有列”，最后關(guān)閉圖四的自定義對話框。以后，只要點擊“對齊所有列”按鈕，Word就會自動對齊所有錯位的表格，非常方便！

最新評論