高手过招(28)

办公族

让表格里错位的数字对齐

出 招

在Word中处理表格时,经常要遇到将一个表格的某些行复制到另一个表格中的情形。但是常常会出现意外的结果——即使两个表格的列数完全一样,粘贴结果却经常错位,粘贴进来的行总是不能和它相邻的行对齐。该如何解决?

破 招

第一招:可以利用Word的表格“自动调整”功能来实现。选中整个错位的表格,选择菜单中的“表格→自动调整→根据内容自动调整表格”即可。而对于某些复杂的表格,首先选中整个错位的表格,然后选择菜单中的“表格→转换→表格转换成文本”,出现一个对话框,任选一种表格中没有出现的字符作为分隔符,将整个表格转换成文本。最后选择菜单“表格→转换→文本转换为表格”,出现转换对话框,选择刚才使用的分隔符,再将文字转换回表格即可。

第二招:如经常要处理错位表格,最好还是创建一个宏。通过宏AutoFitAllTables查找文档中所有的表格,对于每一个表格,分别调用其各个列的AutoFit方法——自动调整其列宽,最终的效果就是对齐所有行和列。打开Word宏的Visual Basic编辑器,输入下面的宏并保存:

Sub AutoFitAllTables()

Dim oTbl As Table

For Each oTbl In ActiveDocument.Ta bles

oTbl.Columns.AutoFit

Next oTbl

End Sub

选择Word菜单“工具→自定义”,转到“命令”选项卡,将AutoFitAllTables宏拖到Word工具栏上适当的位置,Word自动添加以AutoFitAllTables命名的按钮。右击该按钮,将按钮命名为“对齐所有列”,最后关闭自定义对话框。以后,只要点击“对齐所有列”按钮,Word就会自动对齐所有错位的表格。

(赵喜安)