word表格批量合并单元格

一、关于合并单元格的问题

条件：所有的都是A里面三行合并成一个单元格 1 ALT+F8-》宏名里填入“宏1”-》创建-》删了代码窗口原来的内容，把下面内容复制到代码窗口，然后关闭编辑器 2 ALT=F8-》点选“宏1”-》选项-》快捷键填入z-》确定，执行 3 注意问题：“For I = 1 To 10 Step 3”和“s = "A" & I & ":" & "A" & I + 3-1”里的3即为行数，10即为到的列数 Sub 宏1（) ' ' 宏1 Macro ' Billgates 记录的宏 2006-1-3 ' ' 快捷键： Ctrl+z ' For I = 1 To 10 Step 3 s = "A" & I & ":" & "A" & I + 3-1 Range(s)。

Select With Selection 。HorizontalAlignment = xlGeneral 。

VerticalAlignment = xlBottom 。WrapText = False 。

Orientation = 0 。AddIndent = False 。

ShrinkToFit = False 。MergeCells = True End With Next I End Sub。

二、WORD表格多列的快速合并

因为你没有说明表格的具体情况，很难有针对性的回答你的问题，提供一个最简单情况的解决方法： 假设表格为5列，其中没有任何合并单元格，现在将第3、4、5列的内容合并到第3列中。

选择第3、4、5列……复制……打开一个空白文档……粘贴……选择刚粘贴的三列表格……选择菜单栏中的表格……转换……表格转换为文本……将文字分割符设为逗号……确定……选择刚才转换的全部文本……选择菜单栏中的表格……转换……文本转换为表格……设置列数为1，文字分割位置为段落标记……确定……这时三列就合并成一列了……把原表格中的相应内容清除……把合并好的表格粘贴过来。如果中间不要有逗号，用替换的方法将逗号去除。

这时最简单的情况，如果和你的表格不同，灵活应用就行。 如有疑问，请发消息联系！。

转载请注明出处51数据库 » word表格批量合并单元格