İyi akşamlar herkese... Benim sorum şu olacak: Excelde bir sayfada veya bir dosyadaki otomatik şekilleri kaldırmak nasıl bir kod yazılabilir? Ben "Selection.Autoshapes.Delete" ' i denedim ama olmadı, yardımcı olacak arkadaşlara şimdiden teşekkürler...
Sub ŞekilleriKaldır()
Dim Say As Integer
Dim Bak As Integer
Say = ActiveSheet.Shapes.Count
For Bak = 1 To Say
ActiveSheet.Shapes(1).Delete
Next
End Sub
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.