Kenarlık silme

Cevapla
barış34
Mesajlar: 5
Kayıt: Prş Eki 19, 2023 9:17 pm
Adınız: Tunç
Soyadınız: Demirer

Kenarlık silme

Mesaj gönderen barış34 »

Belirli bir aralık tanımlamasındaki , örneğin f10:y500 , "sadece kenarlıkları" kaldıracak bir makro nasıl oluşturulabilir
erseldemirel
Mesajlar: 84
Kayıt: Cmt Haz 24, 2023 12:23 am
Web Sitesi: https://erseldemirel.com.tr/
Adınız: Ersel
Soyadınız: Demirel

Re: Kenarlık silme

Mesaj gönderen erseldemirel »

Örnek bir uygulama deneyiniz

Sub test()
Set rng = Range("F10:Y500")
For Each cell In rng
With cell.Borders
.LineStyle = xlNone
End With
Next cell
End Sub
barış34
Mesajlar: 5
Kayıt: Prş Eki 19, 2023 9:17 pm
Adınız: Tunç
Soyadınız: Demirer

Re: Kenarlık silme

Mesaj gönderen barış34 »

erseldemirel yazdı: Cum Mar 15, 2024 1:07 am Örnek bir uygulama deneyiniz

Sub test()
Set rng = Range("F10:Y500")
For Each cell In rng
With cell.Borders
.LineStyle = xlNone
End With
Next cell
End Sub
Evet Ersel bey tam böyle bir yapı çok teşekkür ederim , sorunsuz çalışıyor.
erseldemirel
Mesajlar: 84
Kayıt: Cmt Haz 24, 2023 12:23 am
Web Sitesi: https://erseldemirel.com.tr/
Adınız: Ersel
Soyadınız: Demirel

Re: Kenarlık silme

Mesaj gönderen erseldemirel »

İyi günler dilerim
Cevapla
  • Benzer Konular
    Cevaplar
    Görüntüleme
    Son mesaj