Arkadaşlar merhaba,
Server altındaki bir excel sayfasında o sayfaya en son erişen kişi veya en son save eden kişiyinin kullanıcı adını gösteren bir şey olabilir mi ?
Şimdiden teşekkür ederim.
Benzer bir örnek verilmişti diye hatırlıyorum ama yınede yazmak istedim.
Umarım İşinizi Görür.
Sub auto_open()
On Error Resume Next
Range("aa1").Value = "Sisteme En Son Giren Kişi" & " " & Date & " " & "Tarihinde" & " " & Application.UserName
End Sub
aşagıdaki Kodu Thisworkbook kısmına yazınız.
Bu kodda Çıkıs Durumunuzu kaydeder.
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayAlerts = False
[aa2].Value = "Sistemden En Son Çıkan Kişi" & " " & Date & " " & "Tarihinde" & " " & Application.UserName
Thisworkbook.save
End Sub
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.