ich als Visual Basic-Anfänger hab mir mal folgendes Protokollmakro geschrieben. Problem: Wie kann ich den Tabellenblattnamen, des veränderten Tabellenblattes auslesen?
Private Sub Workbook_Sheetchange(ByVal TB As Object, ByVal Source As Range)
a = Source.Row
b = Source.Column
c = Application.UserName
d = Source.Value
e = Format(Now, "dd.mm.yyyy")
f = Format(Now, "HH:MM")
g = ActiveWorkbook.Name
h = ActiveSheet.Name
Open "q:\Protokoll\Zeza-zugriffe.txt" For Append As #1
Print #1, "User: " & c & vbTab & "am: " & e & vbTab _
& "um: " & f & vbTab & "geänderte Spalte: " & b _
& ";~ Zeile:" & a & vbTab & "neuer Wert: " & d & vbTab & "in: " & g & h
Close #1
End Sub
"h" liefert mir leider nicht den erhofften Namen, sondern an der Stelle wird abgebrochen...warum?
Danke für Inspirationen