excel刪除空白列方法一：
excel只能篩選行，不能篩選列。如果要批量刪除空白列，可以復(fù)制所有數(shù)據(jù)，在目標(biāo)單元格，選擇性粘貼——轉(zhuǎn)置，然后在任意列篩選所有空白行。最后再將所有數(shù)據(jù)轉(zhuǎn)置回來(lái)。
excel刪除空白列方法二：
選取所有數(shù)據(jù)，按F5鍵，打開(kāi)“定位”對(duì)話框，勾選“空值”，然后單擊開(kāi)始——單元格——?jiǎng)h除——?jiǎng)h除工作表列。（此方法適用于，數(shù)據(jù)列沒(méi)有空單元格，只有整列為空列的情況下使用）。
excel刪除空白列方法三：
按ALT+F11，打開(kāi)VBE編輯器，插入——模塊，復(fù)制下面代碼，然后按F5鍵，運(yùn)行。
Sub 刪除空列()
Dim i%, sh As Worksheet
For Each sh In Worksheets
For i = sh.UsedRange.Cells(sh.UsedRange.Cells.Count).Column To 1 Step -1
If sh.Cells(65536, i).End(xlUp).Row = 1 And sh.Cells(1, i).Text = "" Then sh.Columns(i).Delete
Next i
Next sh
End Sub
excel刪除列還有一種情況是：把EXCEL里面的255列和65538行變成自己想要的只有10列10行的一個(gè)表。
方法就是選中不需要的行、列，然后右鍵隱藏行列即可。
Excel批量刪除空行空列的方法
Sub Del()
Dim irow%, icl%
Cells.UnMerge ''將合并單元格，分成獨(dú)立的單元格
Application.ScreenUpdating = False '屏幕不刷新
For irow = [A65536].End(3).Row To 1 Step -1 '循環(huán)A列最后有數(shù)據(jù)的行數(shù)次，到第1止。
If Len(Cells(irow, 1)) = 0 Then Rows(irow).Delete '判斷A列中的單元是否為空，則刪除這一行
Next
For icl = Cells.Columns.Count To 1 Step -1
If Application.CountA(Columns(icl)) = 0 Then Columns(icl).Delete
Next
Application.ScreenUpdating = True
End Sub
核心關(guān)注：拓步ERP系統(tǒng)平臺(tái)是覆蓋了眾多的業(yè)務(wù)領(lǐng)域、行業(yè)應(yīng)用，蘊(yùn)涵了豐富的ERP管理思想，集成了ERP軟件業(yè)務(wù)管理理念，功能涉及供應(yīng)鏈、成本、制造、CRM、HR等眾多業(yè)務(wù)領(lǐng)域的管理，全面涵蓋了企業(yè)關(guān)注ERP管理系統(tǒng)的核心領(lǐng)域，是眾多中小企業(yè)信息化建設(shè)首選的ERP管理軟件信賴品牌。
轉(zhuǎn)載請(qǐng)注明出處：拓步ERP資訊網(wǎng)http://www.oesoe.com/
本文標(biāo)題：excel刪除空白列的三則技巧
本文網(wǎng)址：http://www.oesoe.com/html/support/11139215106.html
相關(guān)文章
