清除指定欄位空白 - Excel程式區

[發問] 清除指定欄位空白

　暱稱: 熱狗慶

論壇榮譽勳章論壇贊助勳章

1^# 跳轉到 »

發表於 2022-8-29 15:38 | 顯示全部帖子

回復 1# dou10801

Sub test()
For i = 2 To 218 Step 8
Cells(i, 2).Resize(6, 1) = ""
Next
End Sub

靜思自在 : 【停滯不前，終無所得】人都迷於尋找奇蹟，因而停滯不前；縱使時間再多、路再長，也了無用處，終無所得。