Excel使用VBA合并单列、多列单元格

多列合并相同内容单元格

合并相同单元格的功能如下同，让相同内容的单元格合并为一个。

具体代码如下：

Sub 相同内容合并单元格()
'
'
''
Dim i, j As Long
Dim allAddress As Variant
Dim mergeRange As RangeSet mergeRange = Selection
allAddress = Split(mergeRange.Address, ",")
Application.DisplayAlerts = FalseFor j = 0 To UBound(allAddress)'对每个所选区域的每列进行合并Dim firstRow As LongDim firstColumn As LongDim seRange As RangeDim columnsCount As LongDim k As LongSet seRange = Range(allAddress(j))firstRow = seRange.RowfirstColumn = seRange.Column'循环每列For i = firstColumn To firstColumn + seRange.Columns.Count - 1'循环每行For k = firstRow + seRange.Rows.Count - 1 To firstRow Step -1If Cells(k, i) <> "" And k - 1 > 0 ThenIf Cells(k, i).Value = Cells(k - 1, i).Value ThenRange(Cells(k, i), Cells(k - 1, i)).MergeEnd IfEnd IfNext kNext i
Next jApplication.DisplayAlerts = TrueEnd Sub

选择区域，然后执行就可以合并多列的中相同内容的单元格，效果如下

上述VBA实现的功能，仅合并相同内容单元格，和WPS中的功能类似。

目前的不足在于，假如合并B列的单元格时，要求对应行A列单元格也一致，暂时无法满足，需进一步拓展，如下图：在VBA执行后，A、B列都有合并相同单元格，但B列性别合并后，没有与A列相同。使用时需注意！

Excel使用VBA合并单列、多列单元格相关推荐

Excel函数 - 批量合并相同内容的单元格
问题:如下图所示,我想把相同的种类合并到1个单元格中.由图1变为图2. 第一步:我们在C列标题行下面的第一行(即c2单元格)写下这样的公式"=IF(A2=A1,C1,C1+1) " ...
Excel导出且合并相同值的单元格
1.合并单元格工具类 /*** 导出excel工具类*/ public class ExportExcelUtil {public ExportExcelUtil() {super();}/*** @ ...
Excel中如何快速删除整列单元格的前/后几个字符（已解决）
我在整理表格时候遇到这样的问题,我想把表格每列的前面test_xxxx-删除掉,之后绘制曲线比较容易些,Excel的函数功能很强大比如删掉D列的"test_loss-" 第一步: ...
Excel合并多列单元格并自动换行
Excel合并多列单元格并自动换行例:需要合并D9,E9,F9,G9三列,合并后D9,E9,F9,G9列内容换行至H9 第一:设置H列自动换行解释:但需要将单元格格式里设置"自动换行& ...
Excel如何把一列单元格内多行数据合并为一行
今天跟大家分享一下Excel如何把一列单元格内多行数据合并为一行 1.打开Excel文件,如下图我们想要将这每列数据合并到一个单元格中. 2.首先我们选中数据单元格区域 3.然后点击下图选项(Exce ...
excel单元格内容拆分_Excel批量合并相同内容的单元格
因为我平常工作中整理数据会经常需要批量合并单元格,所以我各处学习,整理了如下批量合并相同内容单元格的方法,以下有WPS的应用截图,也有excel的应用截图,但原理是一样的,供大家参考. 在日常办公中经 ...
表格怎么合并两列数据php,怎么合并两列单元格的文字
合并两列单元格的文字的方法:首先打开一个excel表:然后选择一个要放合并之后内容的单元格,并在单元格中输入公式"=A1&B1()":最后按Enter回车键即可. 本文操作 ...
VBA学习笔记8：单元格的合并与拆分
VBA学习笔记8:单元格的合并与拆分如下图,需要实现1图到2图(单元格合并),或2图到1图(单元格拆分). 1图: 2图: 合并单元格代码如下: Sub 合并单元格()Dim k%, rng As ...
Excel VBA 学习笔记13：单元格的格式
Excel VBA 学习笔记13:单元格的格式 NumberFormat 属性 (Excel) vba excel 单元格格式设置 Excel VBA 单元格格式 python解决SNIMissing ...

Excel使用VBA合并单列、多列单元格

Excel使用VBA合并单列、多列单元格

多列合并相同内容单元格

Excel使用VBA合并单列、多列单元格相关推荐

最新文章

热门文章