相同格式Word表格快速汇总

@谨听风者

    笔者要汇总56张保存在Word中的员工登记表，方法如下：先把所有Word文件集中保存在同一文件夹中，例如C:\员工登记，再打开Word 并新建一个文档，切换到“插入”选项卡，在“文字”区域的“对象”处选择“文件中的文字”，在“插入文件”窗口中打开“C:\员工登记”文件夹，按“Ctrl+A”组合键选中所有文件，点击“插入”按钮将56张表格汇集到当前Word文档中。

    接着，切换到“开始”选项卡，点击“替换”，在弹出的“查找和替换”窗口中，“查找内容”处输入^p，“替换为”处输入&，&是随意设置的一个符号，可以自行换自己喜欢的符号，然后点击“全部替换”将有段落标记替换成&，如此文档中的所有分段消失了。

    然后按“Ctrl+A”组合键进行全选，点击“插入”选项卡里面的“表格”，再选择“文本转换成表格”，在弹出的窗口中“文字分隔位置”处选择“段落标记”，之后切换到“表格选项”的“布局”选项卡，点击“数据”区域的“转换为文本”，在弹出的窗口中选择“段落标记”和“转换嵌套表格”。

    再按一次“Ctrl+A”组合键进行全选，点击“插入”选项卡里面的“表格”，再选择“文本转换成表格”，在弹出的窗口中输入列数，这个根据实际需求填写，自动调整操作选择“根据内容调整表格”、文字分隔位置选择“段落标记”，这么一来每张表格的数据变成一行数据了，最后就是收尾了，删除不需要的内容（按列删除，例如删除家庭电话这一列），再点击“开始”选项卡的“替换”，将&替换成^p，就可以恢复单元格中的原有分段，大功告成了！

    董师傅点评：如果汇总表格宽了，无法完全显示，点击 “页面布局”选项卡里面的“纸张大小”，选择“其他页面大小”，在“页面设置”窗口中设置宽度为最大值55.87厘米。若提示超出打印区域时，直接单击“忽略”按钮即可。

将指定数据另存为TXT文件

@冥想书生

    有的时候，我们需要将一些数据导出另存为TXT文件，如果是财会软件点击一个按钮就搞定了，Excel怎么做到呢？没有按钮，我们自己设计一个！方法如下：按下组合键“Alt+F8”打开宏窗口，输入宏名“另存为TXT文件，点击“创建”按钮，在打开的VBA窗口中输入如下代码：

新建一张表用于存放待保存的数据  

Set wbTmp = ThisWorkbook.Worksheets.Add(after:=wb)  

复制待保存的数据  

wb.Cells(2 + iJx, "C").Resize(iSc, 1).Copy wbTmp.Cells(1, 1)  

wb.Cells(2 + iJx, "R").Resize(iSc, 1).Copy wbTmp.Cells(1, 2)  

将新表复制出来成为一个单独的文件并另存为TXT  

wbTmp.Copy  

ActiveWorkbook.SaveAs FileName:=ThisWorkbook.Path & "\自定义文件名.txt", FileFormat:=xlText, CreateBackup:=False  

关闭上一步出现的新Workbook  

ActiveWorkbook.Close False  

删除原文件中的临时表  

wbTmp.Delete  

    最后，就是为新增加的宏命令指定一个按钮，今后在Excel内选中数据再点击按钮就可以自动将数据另存为TXT文件。

    董师傅点评：要使用宏功能，需要在“工具”→“宏” →“安全性”中降低安全级别。

数值为0自动变成白色

@微澜心空

    在汇总数据时，经常会碰到一些单元格值为0的情况，这样就不好看也没有意义，自动隐藏值数字0呢？经过摸索，找到了解决方法：假设数据都C列，全选C列，点击“格式”→“条件格式” →“单元格数值”→“等于”，输入0，再点击“格式”→ “字体” →“颜色”，选择白色即可。设置好了条件，当单元格的值等于0时，单元格就自动变成白色了。

    董师傅点评：除了借助条件格式功能，还可以借助IF函数，用法是=IF(原公式=0,"",原公式)， 这个公式的意思是当运算值为0时，显示空格，不为0时显示计算值。

请关注董师傅微博

    怎么办公最有效率？怎么办公最轻松？来看看董师傅的珍藏，相信你一定会有意外的收获。顺带也可以听听董师傅的理财心得，倾听财富的声音！同时有问题也可以微博私信董师傅。