kein WS_Change bei Ziehen mit Maus
18.09.2007 17:23:50
Günter
ich habe folgende Routine in meinem Programm:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Cells(Target.Row, Target.Column).NoteText "Value change at " & Format(Date, "dd.mm.yy") _
& " (" & Format(Now(), "hh:mm:ss") & ") from " & Application.UserName & "."
End Sub
Damit bekommt jede Änderungen (auch bei mehrfach Kopieren) einen Kommentar.
Kann mir jemand dabei helfen, dass auch Zellen markiert werden, wenn der Inhalt durch Ziehen mit der Maus geändert wird?
Danke im Voraus Günter