EXCEL 特定の列内で記載があった行を削除

質問

G列に記載があったものだけを残したいと以前質問した際に回答を頂いた内容ですが、
この内容にプラスして、L列に何か記載があった場合、その行は削除するようにしたいと考
えています。
詳しい方が居りましたら、是非頂けないでしょうか？

sub macro2()
　range("G:L").autofilter field:=1, criteria1:="="
　activesheet.autofilter.range.offset(1).entirerow.delete shift:=xlshiftup
　activesheet.autofiltermode = false
end sub

環境
Excel2003を利用しています。

回答No.1

eden3616 · ベストアンサー

Sub Macro3()
With Range("G:L")
.AutoFilter Field:=6, Criteria1:="<>"
ActiveSheet.AutoFilter.Range.Offset(1).EntireRow.Delete Shift:=xlShiftUp
ActiveSheet.ShowAllData
.AutoFilter Field:=1, Criteria1:="="
ActiveSheet.AutoFilter.Range.Offset(1).EntireRow.Delete Shift:=xlShiftUp
End With
ActiveSheet.AutoFilterMode = False
End Sub

お礼

お世話になります。
早速回答頂き恐縮です。
わからないことばかりですが、頑張って少しずつですが
覚えていきたいと思います。
有難うございました。