Infomentのブログ ～Excel VBA奮闘記～

或る列に於いて、空白セルを行ごと削除したい。 例えば、↓このような場合だ。様々な方がweb上で紹介されているとおり、上から順に消した場合、指示行と処理行の段違いが発生して大惨事になる。従い、下から削除するのが一般的なようだ。 Sub RowDelete() Dim i As Long For i = 10 To 1 Step -1 If Cells(i, 1).Value = ""…