特定のセルを削除するにはどうすればいいですか?

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

私たちは得るだろう：