VBA多活頁一次刪除空白列 - Excel程式區 - 麻辣家族討論版版

麻辣家族討論版版 » Excel程式區 » VBA多活頁一次刪除空白列

返回列表下一主題上一主題發帖

[發問] VBA多活頁一次刪除空白列

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2843
主題: 10
精華: 0
積分: 2899
點名: 0
作業系統: 〔略〕
軟體版本: 〔略〕
閱讀權限: 100
性別: 男
來自: 〔略〕
註冊時間: 2013-5-13
最後登錄: 2025-10-18

1^# 跳轉到 »

發表於 2017-3-24 19:50 | 顯示全部帖子

arr = Array(～～工作表名～～)
On Error Resume Next
For Each sh In arr
　　Sheets(sh).Range("A5:A50").SpecialCells(xlCellTypeBlanks).EntireRow.Delete
Next
On Error GoTo 0

靜思自在 : 能幹不幹，不如苦幹實幹。

返回列表下一主題上一主題