Kenarlık silme
-
- Mesajlar: 5
- Kayıt: 19 Eki 2023, 21:17
- Adınız: Tunç
- Soyadınız: Demirer
Kenarlık silme
Belirli bir aralık tanımlamasındaki , örneğin f10:y500 , "sadece kenarlıkları" kaldıracak bir makro nasıl oluşturulabilir
-
- Mesajlar: 88
- Kayıt: 24 Haz 2023, 00:23
- Web Sitesi: https://erseldemirel.com.tr/
- Adınız: Ersel
- Soyadınız: Demirel
Re: Kenarlık silme
Ö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
Sub test()
Set rng = Range("F10:Y500")
For Each cell In rng
With cell.Borders
.LineStyle = xlNone
End With
Next cell
End Sub
-
- Mesajlar: 5
- Kayıt: 19 Eki 2023, 21:17
- Adınız: Tunç
- Soyadınız: Demirer
Re: Kenarlık silme
Evet Ersel bey tam böyle bir yapı çok teşekkür ederim , sorunsuz çalışıyor.erseldemirel yazdı: ↑15 Mar 2024, 01:07 Ö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
-
- Mesajlar: 88
- Kayıt: 24 Haz 2023, 00:23
- Web Sitesi: https://erseldemirel.com.tr/
- Adınız: Ersel
- Soyadınız: Demirel
Re: Kenarlık silme
İyi günler dilerim