Makro zu Kommentar im Gültigkeitsbereich
23.05.2005 13:20:49
Tobias
hinkrieg....
Ich hab folgendes Makro, daß mir sobald ein Wert in eine Zelle eingetragen wird, in das Kommentarfeld im Gültigkeitsbereich den gleichen Wert wie in die Zelle überträgt.
***********************
Private Sub Worksheet_Change(ByVal Target As Range)
With Target.Validation
.Delete
.Add Type:=xlValidateInputOnly, AlertStyle:=xlValidAlertStop, Operator _
:=xlBetween
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = "values"
.ErrorTitle = ""
.InputMessage = Target.Value
.ErrorMessage = ""
.ShowInput = True
.ShowError = True
End With
End Sub
****************
Meine Frage: Ist es möglich, daß bei weiteren Zelleneinträgen, der letzte Wert nicht gelöscht wird, sondern einfach der neue dazugeschrieben wird, so daß es eine Art Historie gibt?
Kann mir jemand helfen?
Anzeige