VBA Tüm Autoshapeleri Silme


VBA ile sayfa uzerindeki tum autoshapeleri silmek mumkun. hatirlarsaniz bu tarz tum islemleri icin daha oncede for each kullanmistik yine bu yonde bir kod duzenleyecegiz;

VBA Kodlari

Sub Sil()
‘Aktif sayfadaki autoshapeleri silelim
Sheet1.Activate
Dim Sekil As Shape
For Each Sekil In ActiveSheet.Shapes
Sekil.Delete
Next
End Sub

Yazar: mmustafaaslan

2004 yilindan itibaren ozel bir sirketin finans departmaninda calismaktadir. Kendini excel, visual basic kullaniminda gelistirmis olan yazarimiz; Meslegi geregi SAP konusunda ileri derecede bilgilidir.

Bir Cevap Yazın

E-posta hesabınız yayımlanmayacak. Gerekli alanlar * ile işaretlenmişlerdir


7 + 2 =