Makro ile tablo çizgisi çizmek

[bmutlu966]

Bir excel sayfasında seçtiğim alanın sınırlarını kesik çizgilerle çizmek istiyorum. Ancak tek bir hücreyi seçtiğimde hata alıyorum. Ekteki Kodu nasıl düzeltebilirim.

 

[meslan]

Merhaba

Sub ciz()
   With Selection.Borders
        .LineStyle = xlNone
        .Weight = xlHairline
        .ColorIndex = xlAutomatic
    End With
   
End Sub

 

[bmutlu966]

Çok teşekkürler.