返回列表 上一主題 發帖

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

singo1232001
　暱稱: 熱狗慶

中學生Rank: 2

帖子
354 
主題
5 
精華
0 
積分
387 
點名
0  
作業系統
windows7 
軟體版本
vba,vb,excel2007 
閱讀權限
20 
性別
男 
註冊時間
2017-1-8 
最後登錄
2024-8-2 

論壇榮譽勳章論壇贊助勳章
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

TOP

        靜思自在 : 口說一句好話，如口出蓮花；口說一句壞話如口吐毒蛇。
返回列表 上一主題