下圖是參考答案的內(nèi)容：
寫為過程為：
Sub 刪除單元格()
'刪除B4單元格，刪除后右側(cè)單元格左移
Range("B4").Delete Shift:=xlToLeft
'刪除B4單元格，刪除后下方單元格上移
Range("B4").Delete Shift:=xlUp
'刪除B4單元格所在的行
Range("B4").EntireRow.Delete
'刪除B4單元格所在的列
Range("B4").EntireColumn.Delete
End Sub
承擔因您的行為而導(dǎo)致的法律責任，
本站有權(quán)保留或刪除有爭議評論。
參與本評論即表明您已經(jīng)閱讀并接受
上述條款。