Değişikliği yapan kullanıcı adını yazdırmak

[yesilcan]

Değerli hocalarım ve arkadaşlarım,bu dosya ortak klasöründe kullanılıyor.
Yapmak istediğim şey A sutününda yaptığım en son değişikliği C sutününda dosyayı ,
açan kişinin kullanıcı adını yazsın istiyorum .Mümkünmüdür ?
yardımlarınızı rica ediyorum
saygılarımla

 

[Ayhan Ercan]

Doğrumu anladım bilmiyorum ama aşağıdaki kodu bir denermisiniz....

İlgili sayfanın kod penceresine;

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("A:A")) Is Nothing Then Exit Sub
Target.Offset(0, 2) = Application.UserName
End Sub

 

[yesilcan]

hocam süpersiniz gene.
çok teşekkürler
kolay gelsin