Verilen alandaki içerikleri temizledikten sonra temizlenen alanı seçen VBA kodudur.
Option Explicit
'--------------------------------------------------
'İstenilen aralıktaki verileri temizle.
'--------------------------------------------------
Sub IstenilenAraliktakiVerileriTemizle(alanAdres As String)
Range(alanAdres).ClearContents
Range("A1").Select
Range(alanAdres).Select
End Sub
'--------------------------------------------------
'Örnek Kullanım
'--------------------------------------------------
Sub OrnekKullanim()
IstenilenAraliktakiVerileriTemizle "J1:K1"
IstenilenAraliktakiVerileriTemizle "L1"
IstenilenAraliktakiVerileriTemizle "J1:K1, M1:P5"
End Sub