只要你有一台电脑或者手机,都能关注图老师为大家精心推荐的编写“宏”让Excel自动合并选中单元格内容,手机电脑控们准备好了吗?一起看过来吧!
【 tulaoshi.com - Excel教程 】
在用Excel整理表格数据时,希望能够自动合并选中区域内所有单元格的内容,但是Excel软件自带的合并功能无法满足这个要求,应该怎么办呢?
我们可以编写一个宏来实现,它可以巧妙地保存选区中所有单元格内的数据,通过循环赋值到一个变量中,最后再将结果输出到合并后的单元格内。
(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)代码如下:
Sub 合并单元格()
"关闭屏幕更新和警告提示
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Dim i%
"循环统计选中区域的单元格数据并将其合并到StrTotal中
For i = 1 To Selection.Count
StrTotal = StrTotal & Selection.Cells(i)
Next
"设置选区格式
With Selection
.MergeCells = True
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlCenter
.Value = """ & StrTotal "在合并数据前加 "号
(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)End With
"恢复屏幕更新和警告提示
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub
将上面的宏指定给一个自定义的工具栏按钮。接下来我们就可以测试一下结果了,如在几个不相邻的单元格内依次输入不同的数据(可以是文字、字母或数字),最后选中所有的数据区域,单击刚才自定义的按钮,就可以看到合并的效果了。
来源:http://www.tulaoshi.com/n/20160219/1626254.html
看过《编写“宏”让Excel自动合并选中单元格内容》的人还看了以下文章 更多>>