ist es möglich die bestehenden Inhalten(Werte) in Zeile 1, in Zeile 2 als Kommentar einblenden lassen?
Gruß
Ahmadian
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row = 1 Then
If Target.Offset(1, 0).Comment Is Nothing Then
Target.Offset(1, 0).AddComment Target.Value
Else
Target.Offset(1, 0).Comment.Text Text:=Target.Offset(1, 0).Comment.Text & ", " & Target. _
Value
End If
End If
End Sub
Gruß
Bertram