☰

Kommentare in MS Excel in eine neue Spalte verschieben

tag-icon • tag-icon microsoft-excel
Kommentare in MS Excel in eine neue Spalte verschieben

Ich habe eine Spalte in einer Tabelle, in der (fast) jede Zelle dieser Spalte einen Kommentar (rotes Dreieck) hat. Ich möchte alle Kommentare in eine neue Spalte verschieben.

Beispiel für das, was ich habe:

Spalte 1
MIT (Kommentar: MA)
Harvard (Kommentar: MA)
Yale (Kommentar: CT)
NYU (kein Kommentar)

Was ich gerne hätte:

Spalte 1, Spalte 2
MIT, MA
Harvard, MA
Yale, CT
NYU, ?

Antwort1

Ich glaube, das geht nur mit VBA. Versuchen Sie die benutzerdefinierte Funktion ff.:

Public Function GetComment(c As Range) As String
    If c.Comment Is Nothing Then
        GetComment = "?"
    Else
        GetComment = Replace(c.Comment.Text, c.Comment.Author & ":", "")
    End If
End Function

So erstellen Sie die UDF:

  1. Drücken Sie CTRL+ F11.
  2. Fügen Sie den obigen Code ein.
  3. Schließen Sie den VBA-Editor.

Hinweis:
Wenn Sie auch den Namen des Kommentarautors anzeigen möchten, ersetzen Sie die 5. Zeile durch:
GetComment = c.Comment.Text

So verwenden Sie die Funktion, geben Sie das ff. in eine Zelle in der Spalte ein, in der Sie die Kommentare platzieren möchten, und kopieren Sie es anschließend nach unten.

=GetComment(B1)

Dabei
B1ist: eine Zelle, die den Kommentar enthält, den Sie erhalten möchten

Hier ist ein Anwendungsbeispiel:

Bildbeschreibung hier eingeben

verwandte Informationen