Sağ Klikteki Özellikler

[baydeniro]

Merhaba arkadaşlar. Sağ klikteki özellikler (properties) bölümünde dosyayı oluşturan ve son kaydeden bilgileri yer alıyor. Acaba bu bilgilerin boş görünmesini ve güncellenmemesini sağlamak mümkün mü ?

 

[baydeniro]

Merhaba arkadaşlar. Sağ klikteki özellikler (properties) bölümünde dosyayı oluşturan ve son kaydeden bilgileri yer alıyor. Acaba bu bilgilerin boş görünmesini ve güncellenmemesini sağlamak mümkün mü ?

 

[Ömer]

Merhaba,

Araçlar / Seçenekler / Güvenlik menüsünden "kaydederken kişisel bilgileri kaldır" seçeneğini iişaretlerseniz istediğiniz olur. Bu menüyü açınca değiştirdikten sonra aşağıdaki gibi bir makro ile önlem alabilirsiniz.

Yalnız bu tür özellikler dosya kapalıyken de değiştiği için ne derece işinize yarar bilmiyorum.

ThisWorkbook sayfasına kopyalayın. Dosya kapanırken bu özellik aktif olur ve bilgiler silinir. Eğer dosyayı açmadan bilgiler değiştirirlirse açılıştaki makro ile yine boşaltılır.

Private Sub Workbook_BeforeClose(Cancel As Boolean)
 
    ActiveWorkbook.RemovePersonalInformation = True
 
End Sub
 
Private Sub Workbook_Open()
 
    With ActiveWorkbook
        .BuiltinDocumentProperties("Title") = ""
        .BuiltinDocumentProperties("Subject") = ""
        .BuiltinDocumentProperties("Author") = ""
    End With
 
End Sub

 

[baydeniro]

Çok çok teşekkür ederim sayın Ömer. Demek ki bu bile yapılıyormuş, olabileceğine ihtimal vermiyordum açıkçası. Tekrar tekrar teşekkür ederim, elinize, emeğinize sağlık. Sağlıcakla kalın.