如何刪除某些儲存格？

Question

如果相鄰單元格沒有值（空），我想刪除某些單元格。誰能寫一個VBA程式碼嗎？

例如：如果任何給定行中的儲存格「C」為空，則刪除同一行中的儲存格「A」。

謝謝…

Answer 1

如果我們從以下數據開始：

並運行這個簡短的巨集：

Sub KleanUpA()
    Dim r As Range
    Set r = ActiveSheet.UsedRange.Range("C:C").Cells.SpecialCells(xlCellTypeBlanks).Offset(0, -2)
    r.Clear
End Sub

我們將得到：