下圖是參考答案的內(nèi)容:
寫(xiě)為過(guò)程為:
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ān)因您的行為而導(dǎo)致的法律責(zé)任,
本站有權(quán)保留或刪除有爭(zhēng)議評(píng)論。
參與本評(píng)論即表明您已經(jīng)閱讀并接受
上述條款。