[ÇÖZÜLDÜ] Sayfadaki resim silindiğinde dosya bir daha açılmasın....

[enteresan]

Sevgili excel uzmanları,
Çalışma sayfasına koyduğumuz bir resmin başkası tarafından silinmesi halinde, dosya kaydedilip kapatıldıktan sonra, tekrar açılmak istendiğinde açılmaması için bir kod yazılabilir mi?
Saygı ve sevgilerimle....

 

[bedersu]

Buyrun basit bir mantık,

Sub auto_open()
On Error GoTo son:
ActiveSheet.Shapes("Picture 1").Select
End
son:
kapat
End Sub

Sub kapat()
Application.DisplayAlerts = False
ActiveWorkbook.Close
End Sub

 

[enteresan]

Buyrun basit bir mantık,

Sub auto_open()
On Error GoTo son:
ActiveSheet.Shapes("Picture 1").Select
End
son:
kapat
End Sub

Sub kapat()
Application.DisplayAlerts = False
ActiveWorkbook.Close
End Sub

Çok teşekkür ederim. İşime yaradı... Sağlıcakla kalınız...