Word中處理表格時,經(jīng)常要遇到將一個表格的某些行復制到另一個表格的情形?雌饋砗芎唵蔚囊粋問題,卻常常會出現(xiàn)意外的結(jié)果——即使兩個表格的列數(shù)完全一樣,粘貼結(jié)果卻經(jīng)常“錯位”(如圖1),粘貼進來的行總是不能和它相鄰的行對齊。
1. 未雨綢繆,事前準備
要解決這個問題,第一種辦法是改進一下將行粘貼到目標表格的操作方式。
首先顯示出所有的格式標記。選擇菜單“工具→選項”,選擇“視圖”選項卡,選中“格式標記”下面的“全部”(如圖2)。完成后點擊“確定”。在目標表格的末尾添加一個空行,注意不要在這個行輸入任何內(nèi)容。在源表格中,選中要復制的行所包含的單元格,但不要選中行末尾的結(jié)束標記。然后將選中的內(nèi)容復制后粘貼在目標表格中,必要時,Word會自動插入新的行,新插入的行總是與現(xiàn)有的行完全對齊。
但這個辦法不是任何時候都適用的——如果我們要把粘貼進來的內(nèi)容放入目標表格的其他位置(而不是最后),目標表格中原來的內(nèi)容就有可能會被覆蓋——除非在粘貼之前,我們首先在目標表格中插入足夠的空行,不過這樣做似乎又太麻煩了。
2. 亡羊補牢,事后補救
我們再來看看錯位表格的事后補救辦法。首先,我們可以利用Word的表格“自動調(diào)整”功能。
選中整個錯位的表格,選擇菜單“表格→自動調(diào)整→根據(jù)內(nèi)容自動調(diào)整表格”。但是,對于某些復雜的表格,特別是存在嵌套表格的情況下,這種辦法仍不一定奏效。這時可采用“表格→文本→表格”的轉(zhuǎn)換法。選中整個錯位的表格,將整個表格轉(zhuǎn)換成文本。方法是:選擇菜單“表格→轉(zhuǎn)換→表格轉(zhuǎn)換成文本”,出現(xiàn)一個對話框(如圖3)。任選一種表格中沒有出現(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.Columns.AutoFit
Next oTbl
End Sub
打開Word宏的Visual Basic編輯器,輸入上面的宏,保存。選擇Word菜單“工具→自定義”,轉(zhuǎn)到“命令”選項卡(如圖4),將AutoFitAllTables宏拖到Word工具欄上適當?shù)奈恢,Word自動添加以AutoFitAllTables命名的按鈕。右擊該按鈕,將按鈕命名為“對齊所有列”,最后關(guān)閉圖四的自定義對話框。以后,只要點擊“對齊所有列”按鈕,Word就會自動對齊所有錯位的表格,非常方便!
1. 未雨綢繆,事前準備
要解決這個問題,第一種辦法是改進一下將行粘貼到目標表格的操作方式。
首先顯示出所有的格式標記。選擇菜單“工具→選項”,選擇“視圖”選項卡,選中“格式標記”下面的“全部”(如圖2)。完成后點擊“確定”。在目標表格的末尾添加一個空行,注意不要在這個行輸入任何內(nèi)容。在源表格中,選中要復制的行所包含的單元格,但不要選中行末尾的結(jié)束標記。然后將選中的內(nèi)容復制后粘貼在目標表格中,必要時,Word會自動插入新的行,新插入的行總是與現(xiàn)有的行完全對齊。
但這個辦法不是任何時候都適用的——如果我們要把粘貼進來的內(nèi)容放入目標表格的其他位置(而不是最后),目標表格中原來的內(nèi)容就有可能會被覆蓋——除非在粘貼之前,我們首先在目標表格中插入足夠的空行,不過這樣做似乎又太麻煩了。
2. 亡羊補牢,事后補救
我們再來看看錯位表格的事后補救辦法。首先,我們可以利用Word的表格“自動調(diào)整”功能。
選中整個錯位的表格,選擇菜單“表格→自動調(diào)整→根據(jù)內(nèi)容自動調(diào)整表格”。但是,對于某些復雜的表格,特別是存在嵌套表格的情況下,這種辦法仍不一定奏效。這時可采用“表格→文本→表格”的轉(zhuǎn)換法。選中整個錯位的表格,將整個表格轉(zhuǎn)換成文本。方法是:選擇菜單“表格→轉(zhuǎn)換→表格轉(zhuǎn)換成文本”,出現(xiàn)一個對話框(如圖3)。任選一種表格中沒有出現(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.Columns.AutoFit
Next oTbl
End Sub
打開Word宏的Visual Basic編輯器,輸入上面的宏,保存。選擇Word菜單“工具→自定義”,轉(zhuǎn)到“命令”選項卡(如圖4),將AutoFitAllTables宏拖到Word工具欄上適當?shù)奈恢,Word自動添加以AutoFitAllTables命名的按鈕。右擊該按鈕,將按鈕命名為“對齊所有列”,最后關(guān)閉圖四的自定義對話框。以后,只要點擊“對齊所有列”按鈕,Word就會自動對齊所有錯位的表格,非常方便!