gizlilik uyarısı ve mesajda resim göstermek

[mersilen]

Merhabalar,
Makrolu excel sayfasını kaydetmek istediğimde ekrana gizlilik uyarısı diye diyalog kutusu açılmakta.Makra kaydette bubu kodunu öğrenmek istedim ama kodu yok.
Herhangi bir makroda save çalıştırdığımda bu diyalog kutusunu onaylamazsam makro o aşamada duruyor.Bunun çözümü var mı ?

Sub Makro1()
    Range("C11").Select
    ActiveCell.FormulaR1C1 = "dg"
    ChDir "C:\Users\xx\Desktop"
    ActiveWorkbook.SaveAs Filename:="C:\Users\GÜRCAN\Desktop\sendkey.xlsm", _
        FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
    

    Range("E17").Select
    ActiveCell.FormulaR1C1 = "fgj"
    ActiveWorkbook.Save
    Range("E21").Select
End Sub

Birde bu excel.web.tr deki mesajlarda bazen resimler gözükmekte, bunu nasıl yapıyoruz ?

 

[mersilen]

1. sorunun cevabını buldum
gizlilik uyarısını kaldırma
http://www.excel.web.tr/f50/gizlilik-uyarysy-hatasy-t97396.html

*Excel 2007 de Sol üst köşede Yuvarlak simgeye tıklayın
*Sağda En Altta Excel Seçeneklerine Tıklayın
*Açılan yerden güvenlik merkezine tıklayın
*Sağ tarafda Güvenlik Merkezi Ayarlarını Açın
*Açılan Sayfada Gizlilik Seçeneklerine Tıklayın
*Sağ tarafda " Kaydederken Dosya Özelliklerinden Kişisel Bilgileri Kaldır" Seçeneğinin İşaretini Kaldırın.
* Açık Sayfalara Tamam diyip Kapatın.

Bukadarcık....