Dosya Kaç Kere Açıldı Bilgisi Nasıl Alınır ?

[dfom_2004]

Makro ile dosya kaç kere açıldı bilgisi alınabilirmi?

 

[ozgretmen]

Kitabın ThisWorkbook modülüne aşağıdaki kodu ekleyiniz :

Private Sub Workbook_Open()
Sheets("Sayfa1").[IV1].Value = Sheets("Sayfa1").[IV1].Value + 1
MsgBox " Bu Kitabın " & Sheets("Sayfa1").[IV1].Value & " . Açılışıdır ",vbOKOnly
End Sub