EXCEL vba 合并相同单元格

Posted E米阳光

tags:

篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了EXCEL vba 合并相同单元格相关的知识,希望对你有一定的参考价值。

Sub Macro1()
‘ Macro1 Macro
‘ 快捷键: Ctrl+Shift+A
Application.Goto Reference:="Macro1"
Application.DisplayAlerts = False
For i = [a65536].End(3).Row To 2 Step -1
If Cells(i - 1, 1) = Cells(i, 1) Then
Range(Cells(i - 1, 1), Cells(i, 1)).Merge
End If
Next
For i = [a65536].End(3).Row To 2 Step -1
If Cells(i - 1, 7) = Cells(i, 7) Then
Range(Cells(i - 1, 7), Cells(i, 7)).Merge
End If
Next
Application.DisplayAlerts = True
End Sub

以上是关于EXCEL vba 合并相同单元格的主要内容,如果未能解决你的问题,请参考以下文章

从 vba 中的单元格地址获取 excel 合并单元格的值

在EXCEL中 如何用VBA查找某特定单元格并返回该单元格的行和列值?

EXCEL根据单元格名称改变后自杀,求VBA代码!

基于列值合并单元格的 VBA 宏

VBA怎样取到查找到的单元格位置

使用 MergeArea 检测 VBA Excel 中的合并单元格