本文介绍的excel多个单元格内容合并所使用到的方法,是用的笔者编写的单元格内容合并函数来完成的. 关于excel多个单元格内容合并的方法,我们之前介绍过PHONETIC函数来实现。我们先来回顾一下单元格内容合并函数PHONETIC用法。 如果我们要将A1、B1、C1单元格内容合并,可以使用公式:=PHONETIC(A1:C1)实现。如下图所示。
不过,单元格内容合并函数PHONETIC函数有其自身的不足,主要体现在多个单元格内容合并的时候,不能同时加上用户自定义的内容。
再继续看下面的实例,我们希望多个单元格内容合并的同时,并且每个单元格内容之间加上标点符号逗号相隔开。效果图如下:
这样特殊的单元格内容合并操作,就不是excel内置命令可以完成的了。既然单元格内容合并函数无法实现,我们就只有利用VBA,自己编写一个函数来解决单元格内容合并问题。操作方法如下:
第一,在工作表标签上面右击,选择“查看代码”,进入VBA编辑器,简称VBE。
第二,点击 插入- 模块。在右上角小窗口可以看到插入后的模块1,双击模块1,右侧即会显示一个空白的区域,此区域即是编写函数和存放函数代码的地方。
第三,开始编写函数
Function LianJie(Rg As Range, sr As String)
Dim R As String
Application.Volatile True
For Each s In Rg
R = R & sr & s
Next s
LianJie = Right(R, Len(R) - 1)
End Function
第四,保存代码
在excel2007版以后,代码需要保存在xlsm类型的文件中。文件 - 另存为 - 类型选取“Excel启用宏的工作簿(*.xlsm)"
第五,关闭返回工作表中使用上面自已编写的函数
我们在E1单元格输入公式:=LianJie(A1:D1,","),就可以快速将多个单元格内容合并。 |