Excel: Zellinhalt verschieben, um in eine bestimmte Zelle zu kommentieren

Question

Ich muss den Textinhalt einer Zelle in einen Kommentar in einer anderen Zelle (der linken) umwandeln. Ich sahdieser Beitrag, und der Code funktioniert einwandfrei, aber er fügt den Kommentar in dieselbe Zelle ein, in der sich der Textinhalt befindet.

Beispiel: Der Text in Spalte B soll ein Kommentar zu Spalte A sein.

Answer 1

Wählen Sie die Zellen aus, die die Daten enthalten(in Ihrem Fall die Zellen in Spalte B)

und führen Sie dieses kurze Makro aus:

Sub CommentMaker()
   Dim r As Range, v As String
   For Each r In Selection
      If r.Column <> 1 Then
         If r.Text <> "" Then
         v = r.Text
         With r.Offset(0, -1)
            .ClearComments
            .AddComment
            .Comment.Visible = False
            .Comment.Text Text:=v
         End With
         End If
      End If
   Next r
End Sub

Notiz: Die Originaldaten werden hierdurch nicht gelöscht!