日日操夜夜添-日日操影院-日日草夜夜操-日日干干-精品一区二区三区波多野结衣-精品一区二区三区高清免费不卡

公告:魔扣目錄網為廣大站長提供免費收錄網站服務,提交前請做好本站友鏈:【 網站目錄:http://www.ylptlb.cn 】, 免友鏈快審服務(50元/站),

點擊這里在線咨詢客服
新站提交
  • 網站:51998
  • 待審:31
  • 小程序:12
  • 文章:1030137
  • 會員:747

文章介紹excel刪除空白列的三種方法,以及如何批量刪除空行空列。

excel刪除空白列方法一:

  excel只能篩選行,不能篩選列。如果要批量刪除空白列,可以復制所有數據,在目標單元格,選擇性粘貼——轉置,然后在任意列篩選所有空白行。最后再將所有數據轉置回來。

excel刪除空白列方法二:

  選取所有數據,按F5鍵,打開“定位”對話框,勾選“空值”,然后單擊開始——單元格——刪除——刪除工作表列。(此方法適用于,數據列沒有空單元格,只有整列為空列的情況下使用)。

excel刪除空白列方法三:

  按ALT+F11,打開VBE編輯器,插入——模塊,復制下面代碼,然后按F5鍵,運行。
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行的一個表。
  方法就是選中不需要的行、列,然后右鍵隱藏行列即可。

Excel批量刪除空行空列的方法
Sub Del()
Dim irow%, icl%
Cells.UnMerge ”將合并單元格,分成獨立的單元格
Application.ScreenUpdating = False ‘屏幕不刷新
For irow = [A65536].End(3).Row To 1 Step -1 ‘循環A列最后有數據的行數次,到第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

分享到:
標簽:刪除 單元格 方法 空白 Excel教程
用戶無頭像

網友整理

注冊時間:

網站:5 個   小程序:0 個  文章:12 篇

  • 51998

    網站

  • 12

    小程序

  • 1030137

    文章

  • 747

    會員

趕快注冊賬號,推廣您的網站吧!
最新入駐小程序

數獨大挑戰2018-06-03

數獨一種數學游戲,玩家需要根據9

答題星2018-06-03

您可以通過答題星輕松地創建試卷

全階人生考試2018-06-03

各種考試題,題庫,初中,高中,大學四六

運動步數有氧達人2018-06-03

記錄運動步數,積累氧氣值。還可偷

每日養生app2018-06-03

每日養生,天天健康

體育訓練成績評定2018-06-03

通用課目體育訓練成績評定