返回列表 上一主題 發帖

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

回復 1# dou10801


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

TOP

        靜思自在 : 人生最大的成就是從失敗中站起來。
返回列表 上一主題