一秒刪除工作表里面的合并單元格行
在整理數(shù)據(jù)的時(shí)候，經(jīng)常會遇到需要刪除有合并單元格的行。如下圖，表內(nèi)有幾百個這樣的合并表頭要一個個刪除實(shí)在是浪費(fèi)時(shí)間，用VBA的話，一秒解決，剩下的時(shí)間該怎么玩怎么玩。哈哈~~
在此之前，記得想把你的Excel另存為啟用宏的格式
接下來記得開啟宏功能，步驟如下：Excel文件——選項(xiàng)——信任中心——信任中心設(shè)置——宏設(shè)置——勾選啟用所有宏——勾選信任VBA，如下圖：
接下來，把代碼復(fù)制到VBA窗口，方法是右鍵點(diǎn)擊工作表，選擇查看代碼
在打開的資源管理器里面，右鍵插入模塊
然后把以下代碼復(fù)制進(jìn)去Sub 刪合并單元格行() Dim i As Long For i = Cells(1048576, 1).Endwps2016政府版(xlUp).Row To 2 Step -1 從工作表最后一個單元格開始向上倒著執(zhí)行
If Cells(i, 1).MergeCells Then 如果單元格為合并單元格 Cells(i, 1).EntireRow.Delete 符合條件的都刪除整行 End If Next 檢測下一個
End Sub
保存代碼。關(guān)閉該窗口回到工作表，點(diǎn)擊開發(fā)工具——宏——選擇刪合并單元格行——執(zhí)行
一秒運(yùn)行后得到如下結(jié)果，即只保留了第一行標(biāo)題行的合并單元格，其他的合并單元格行都被刪除了。
如果你工作中有需要處理大量的這種數(shù)據(jù)，可以嘗試一下哦。
熱門文章
-
干貨滿滿（成都華大醫(yī)藥衛(wèi)生學(xué)校2020年招生簡章視頻）成都華大醫(yī)藥衛(wèi)生學(xué)校2021年招生簡章，成都華大醫(yī)藥衛(wèi)生學(xué)校2020年招生簡章，巨型豬籠草，
-
不看后悔（抖音開放平臺官方微信小程序上線怎么關(guān)閉）抖音官方小程序開發(fā)者工具，抖音開放平臺官方微信小程序上線！，合作學(xué)習(xí)理論，
-
這都可以？（三菱plc軟元件存儲器是干嘛的）三菱plc編程軟件查看軟元件，三菱FX3-PLC軟元件介紹，芭芭農(nóng)場每日答案，
-
一看就會（拔網(wǎng)線是什么意思?）拔網(wǎng)線是拔哪一根，自己拔網(wǎng)線？啟用本國互聯(lián)網(wǎng)，DNS被美國防部控制怎么破？，自行車分類，
-
不要告訴別人（關(guān)于旅游觀光創(chuàng)意設(shè)計(jì)商品的考察報(bào)告）旅游觀光創(chuàng)意設(shè)計(jì)商品進(jìn)行調(diào)查歸納，旅游觀光創(chuàng)意設(shè)計(jì)商品進(jìn)行調(diào)查問卷進(jìn)行調(diào)查（問卷進(jìn)行調(diào)查模版），鋪天蓋地指什么十二生肖，
最近發(fā)表
-
墻裂推薦（微信小程序開發(fā)圖解案例教程 pdf）微信小程序開發(fā)示例，小白開發(fā)日記——學(xué)習(xí)開發(fā)微信小程序第四天——設(shè)計(jì)界面(二)，我國人均水資源是世界多少分之一，
-
萬萬沒想到（js實(shí)現(xiàn)滑塊拖動）auto.js滑動，前端開發(fā)：純JavaScript滑動特效插件，主要面向移動端（swiper），北京科技大學(xué)官網(wǎng)，
-
原創(chuàng)（swiper-no-swiping）swiper3，Swiper 4特色功能及使用教程，歐洲服務(wù)器，
-
居然可以這樣（swiper組件的( )屬性用于設(shè)置輪播圖是否自動播放）swiper自動輪播代碼，小程序?qū)W習(xí)日志8：swiper滑動輪播組件（輪播圖）（上），山東省綜合素質(zhì)評價(jià)登錄，
-
滿滿干貨（vue3輪播圖）vue.js輪播圖，Vue輪播圖插件中的精品——Vue-Awesome-Swiper，委托貸款管理辦法2020，