編按：

這是一個文本合并的問題。即將不同的單元格內(nèi)容合并起來，并顯示在一個單元格中。問題逐步升級，解答方法也從函數(shù)上升到VBA，一起來看一下吧！

我發(fā)現(xiàn)，日常推文中一有VBA的內(nèi)容，總有小伙伴出來說：“饒了我，又騙我來學VBA!”

今天我們來研討一個實例，看看在 不改變原數(shù)據(jù)的情況下，不用VBA到底能不能實現(xiàn)？

這是一個文本合并的問題，將不同的單元格內(nèi)容，合并內(nèi)容后，顯示在一個單元格中。

如果同學們看到這個需求后，頭腦中形成了某些函數(shù)或者連詞符，那說明你還是有EXCEL積累的。

接下來，讓我們用逐步升級的方式，看看這類問題，是如何一步一步到必須要使用VBA的吧！

1、初級合并文本

如圖所示，要求把所有的活動名稱合并在一個單元格中。

在B18單元格，輸入=PHONETIC(B2:B15)，可以得到下面的結(jié)果：

展開全文

2、 問題升級——用輔助列也很容易

那如果我們把參加活動的日期也加上，如下示例：

現(xiàn)在，我們需要把“活動名稱”和對應的“參會日期”，合并到一個單元格中。

思路：此時可以加一個輔助列，然后再用PHONETIC函數(shù)。如下：

Step1：在D2單元格輸入函數(shù)="【"TEXT(C2,"yyyy-m-d")"】"B2，將日期和活動名稱連接起來，下拉填充至D15單元格，作為PHONETIC函數(shù)的引用區(qū)域。

Step2：復制D2:D15單元格區(qū)域，選擇性粘貼為數(shù)值（這里注意PHONETIC函數(shù)只能引用“文本字符串”）。

為了間隔每條記錄，我們在E2:E14單元格區(qū)域輸入CHAR(10)換行符作為間隔符，同樣也要將函數(shù)復制粘貼為數(shù)值。

Step3：在C17單元格輸入函數(shù)=PHONETIC(D2:E15)，及此得到我們下圖的結(jié)果：

3、 問題再升級——你還打算使用函數(shù)來做嗎？

案例如下：

需求就是：要把每個人的姓名去重只保留一行，然后在名字對應的右側(cè)B列單元格，按照日期和活動內(nèi)容合并，寫在一個單元格中。

有同學說：按姓名排序，然后逐個姓名去PHONETIC，再整理文件。

當然可行，但是實際數(shù)據(jù)如果超過100，就比較頭疼了吧？

下面看看筆者是如何處理的吧：

Step1：按ALT+F11組合鍵，打開VBE界面，插入一個待操作的模塊。

Step2：輸入代碼

需要代碼的同學，可以掃一掃文章下方的二維碼，在公眾號留言領取。

Step3：執(zhí)行代碼，得到結(jié)果，及此完成。

有了代碼，以后這個工作就是“一鍵操作”，增減數(shù)據(jù)都適用。

如果是函數(shù)的話，能否寫出公式暫且不提，隨著數(shù)據(jù)的增減，我們還要去修改一次函數(shù)的參數(shù)，那可真的是要了老命了。

所以，想在Excel方面更上一層樓的話，VBA是無論如何也繞不開的。

感興趣的同學，趕緊和我們一起學起來吧！

做Excel高手，快速提升工作效率，部落窩教育《一周Excel直通車》視頻和《Excel極速貫通班》直播課全心為你！

學習交流請加微信：hclhclsc進微信學習群。

相關推薦：

將excel中的數(shù)據(jù)按照指定數(shù)量進行重復，非得用VBA才能實現(xiàn)嗎？

如何提取唯一值？試試TEXTJOIN函數(shù)搭配VBA自定義！

別怕，VBA入門級教程來了，條件語句很簡單！

八大查找函數(shù)公式，輕松搞定數(shù)據(jù)中的多條件查找

版權申明：

本文作者E圖表述；同時部落窩教育享有專有使用權。若需轉(zhuǎn)載請聯(lián)系部落窩教育。