Wie kann man mit VLOOKUP einen passenden Wert mit Zellkommentar zurückgeben?

Wenn Sie die VLOOKUP-Funktion verwenden, um den passenden Wert zurückzugeben, wird nur der Wert ohne Formatierung extrahiert, wie z.B. Füllfarbe, Schriftart oder Kommentar usw. Manchmal möchten Sie jedoch möglicherweise mit VLOOKUP den passenden Wert einschließlich des Kommentars zurückgeben, um das Ergebnis im folgenden Screenshot zu erhalten. Wie könnten Sie diese Aufgabe in Excel lösen?

VLOOKUP und Rückgabe des passenden Werts mit Zellkommentar mithilfe von VBA-Code

VLOOKUP und Rückgabe des passenden Werts mit Zellkommentar mithilfe von VBA-Code

Der folgende VBA-Code kann Ihnen helfen, mit VLOOKUP den passenden Wert samt Kommentar zurückzugeben. Bitte gehen Sie wie folgt vor:

1. Halten Sie die Tasten ALT + F11 gedrückt, um das Fenster Microsoft Visual Basic for Applications zu öffnen.

2. Klicken Sie auf Einfügen > Modul, dann kopieren und fügen Sie den folgenden Code in das Modulfenster ein.

VBA-Code: VLOOKUP und Rückgabe des passenden Werts mit Zellkommentar:

Function VlookupComment(LookVal As Variant, FTable As Range, FColumn As Long, FType As Long) As Variant
'Updateby Extendoffice
    Application.Volatile
    Dim xRet As Variant 'could be an error
    Dim xCell As Range
    xRet = Application.Match(LookVal, FTable.Columns(1), FType)
    If IsError(xRet) Then
        VlookupComment = "Not Found"
    Else
        Set xCell = FTable.Columns(FColumn).Cells(1)(xRet)
        VlookupComment = xCell.Value
        With Application.Caller
            If Not .Comment Is Nothing Then
                .Comment.Delete
            End If
            If Not xCell.Comment Is Nothing Then
                .AddComment xCell.Comment.Text
            End If
        End With
    End If
End Function

3. Speichern Sie anschließend den Code und schließen Sie das Codefenster. Geben Sie diese Formel ein: =vlookupcomment(H2,A2:C10,3,FALSE) in eine leere Zelle, um das Ergebnis zu platzieren, und drücken Sie die Eingabetaste. Der passende Wert sowie der Kommentar werden sofort zurückgegeben, siehe Screenshot:

Hinweis: In der obigen Formel ist H2 der Suchwert, für den Sie den entsprechenden Wert zurückgeben möchten, A2:C10 ist die Datentabelle, die Sie verwenden möchten, und die Zahl 3 ist die Spaltennummer, die den passenden Wert enthält, den Sie zurückgeben möchten.

Entfesseln Sie die Magie von Excel mit Kutools AI

• Intelligente Ausführung: Führen Sie Zellenoperationen durch, analysieren Sie Daten und erstellen Sie Diagramme – alles angetrieben durch einfache Befehle.
• Benutzerdefinierte Formeln: Erstellen Sie maßgeschneiderte Formeln, um Ihre Arbeitsabläufe zu optimieren.
• VBA-Codierung: Schreiben und implementieren Sie VBA-Code mühelos.
• Formelinterpretation: Verstehen Sie komplexe Formeln mit Leichtigkeit.
• Textübersetzung: Überwinden Sie Sprachbarrieren in Ihren Tabellen.

Erweitern Sie Ihre Excel-Fähigkeiten mit KI-gestützten Tools. Laden Sie jetzt herunter und erleben Sie eine Effizienz wie nie zuvor!