網(wǎng)友需求：

因網(wǎng)友給的需求表格的行數(shù)太多，且全英文，這里不再展示。

這個(gè)問題我講過，我講的是刪除列，網(wǎng)友換成行，把完整匹配改成包含，包含用like

https://www.bilibili.com/video/BV1z64y197Ce??

視頻共兩集：

讓我想起一件事，我曾經(jīng)講過，有N個(gè)工作表，從每個(gè)工作表的A1單元格取值匯總到一個(gè)工作表中，網(wǎng)友學(xué)會(huì)了，然后網(wǎng)友問我，那我要是從A2單元格取值怎么寫代碼？

我再講A2單元格怎么寫，并告訴他們換單元格就換個(gè)名字就好了，然后還會(huì)有人問換成A3和A4單元格怎么寫。。。。你回復(fù)了，還會(huì)有人問，如果我想第一張表是A1單元格，第二張表是B7單元格，第三張表......? ?那你寫個(gè)字典就好了，Key是表名，Value是取哪個(gè)單元格。

同樣的問題還出在對(duì)文件的整理上，F(xiàn)SO對(duì)象和DIR函數(shù)很多網(wǎng)友只能照搬我的代碼，改一點(diǎn)需求都不想動(dòng)腦子。

原因不是誰聰明的問題，是網(wǎng)友沒有時(shí)間看系統(tǒng)課程，不花時(shí)間成本，只想快速把事情給辦了。這是不可能的，付出>=回報(bào) 。? 回報(bào)>付出? 那不現(xiàn)實(shí)。

回到今天這個(gè)問題上，我做了一張中文的表

關(guān)鍵詞：18，東城，大桃

解決網(wǎng)友方案1：CDE列，遇到關(guān)鍵詞就刪除整行

1、我們知道是哪些列，就可以將這些列合并起來

可以用VBA代碼做連接，也可以直接在表里用工作表函數(shù)做連接

2、判斷【合并】列是否包含關(guān)健詞，包含就刪除整行

刪除會(huì)改變行號(hào)，所以要倒著刪。這些知識(shí)在ExcelVBA第二季里都講過

如果你的關(guān)鍵詞多了，比如有100多個(gè)，不適合用array手工寫，我們課上講了創(chuàng)建數(shù)組三種方法，可以使用13.7.3通過單元格區(qū)域直接創(chuàng)建數(shù)組的方法。

例如我有一張表單獨(dú)存放關(guān)鍵詞

我們剛才做的合并列想刪除，只需要在End sub 之前加入一句話，將F1所在的整列刪除，完整代碼如下

解決網(wǎng)友方案2：某列，遇到關(guān)鍵詞就輸出

我與網(wǎng)友核對(duì)了名詞：輸出? ?的意思

準(zhǔn)備一個(gè)表，把表頭復(fù)制過來，也可以用代碼復(fù)制過來

只需要知道匯總表沒有使用的那一行行號(hào)就可以了。例如現(xiàn)在就一個(gè)表頭，我們?cè)诘诙袕?fù)制，如果第二行有文字，那就在第三行復(fù)制。

這次我們從Sheet1表的第2行開始向最后一行復(fù)制

結(jié)果如下：

以網(wǎng)友目前對(duì)知識(shí)掌握的情況，暫時(shí)先用循環(huán)的方式處理。等系統(tǒng)學(xué)會(huì)知識(shí)后，可以用更“高級(jí)”的方法處理該問題。

ExcelVBA合集：https://www.bilibili.com/video/BV1rt4y1a72y

更多教程：https://www.bilibili.com/read/cv10222110