Na to sam i ja mislio, a kod bi izgledao otprilike ovako
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
korisnik = ActiveWorkbook.UserStatus
Cells(1, 1).Value = Date & " " & korisnik(1, 1)
End Sub
s tim da bi ga trebalo ubaciti na svaki radni list na događaj Change.
Možda je tačno da je sve već rečeno, samo nisu svi sve čuli i razumeli ...