|
全文1100字，预计4分钟读完 这是一个文本合并的问题。 即将不同的单元格内容合并起来，并显示在一个单元格中。 我们会将问题逐步升级，解答方法也从函数上升到VBA！ 感兴趣的同学，一起来看一下吧！ 编辑：六姑娘 作者：E图表述 今天我们来研讨一个实例，看看在 不改变原数据的情况下，不用VBA到底能不能实现？ 1、 初级合并文本
如图所示，要求把所有的活动名称合并在一个单元格中。 在B18单元格，输入=PHONETIC(B2:B15)，可以得到下面的结果：
2、问题升级——用辅助列也很容易 那如果我们把参加活动的日期也加上，如下示例：
现在，我们需要把“活动名称”和对应的“参会日期”，合并到一个单元格中。 思路：此时可以加一个辅助列，然后再用PHONETIC函数。如下： Step1：在D2单元格输入函数="【"&TEXT(C2,"yyyy-m-d")&"】"&B2，将日期和活动名称连接起来，下拉填充至D15单元格，作为PHONETIC函数的引用区域。 Step2：复制D2:D15单元格区域，选择性粘贴为数值（这里注意PHONETIC函数只能引用“文本字符串”）。 为了间隔每条记录，我们在E2:E14单元格区域输入CHAR(10)换行符作为间隔符，同样也要将函数复制粘贴为数值。 Step3：在C17单元格输入函数=PHONETIC(D2:E15)，及此得到我们下图的结果：
3、问题再升级——你还打算使用函数来做吗？ 案例如下：
需求就是：要把每个人的姓名去重只保留一行，然后在名字对应的右侧B列单元格，按照日期和活动内容合并，写在一个单元格中。 有同学说：按姓名排序，然后逐个姓名去PHONETIC，再整理文件。 当然可行，但是实际数据如果超过100，就比较头疼了吧？ 下面看看笔者是如何处理的吧： Step1：按ALT+F11组合键，打开VBE界面，插入一个待操作的模块。
Step2：输入代码
需要代码和课件的同学，扫一扫文章下方的二维码，进群领取。 Step3：执行代码，得到结果，及此完成。
有了代码，以后这个工作就是“一键操作”，增减数据都适用。 如果是函数的话，能否写出公式暂且不提，随着数据的增减，我们还要去修改一次函数的参数，那可真的是要了老命了。 所以，想在Excel方面更上一层楼的话，VBA是无论如何也绕不开的。 感兴趣的同学，赶紧和我们一起学起来吧！ |
|
|
