VBA：单元格合并时内容也进行合并
一、功能
选中单元格，在进行合并时，单元格的内容也进行合并，而不只是保留左上角单元格。
二、代码示例
Sub hebing()
Dim s As String, c As RangeIf TypeName(Selection) = "Range" ThenFor Each c In Selections = s & c.ValueNextApplication.DisplayAlerts = FalseSelection.MergeSelection.Value = sApplication.DisplayAlerts = TrueEnd If
End Sub三、特别说明
Selection.Merge
这个语句是要合并单元格，如果注释掉会有另外一个效果；
PS：初步学习VBA，该例子是《VBA实战技巧精粹》上的，但是现在有个疑问，如果是很多行需要合并，怎么操作？现在还不会，等琢磨出来了再补充。
本文来自互联网用户投稿，文章观点仅代表作者本人，不代表本站立场，不承担相关法律责任。如若转载，请注明出处。 如若内容造成侵权/违法违规/事实不符，请点击【内容举报】进行投诉反馈！