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.
Die besten Produktivitätstools für das Büro
Stärken Sie Ihre Excel-Fähigkeiten mit Kutools für Excel und genießen Sie Effizienz wie nie zuvor. Kutools für Excel bietet mehr als300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen...
Office Tab bringt die Tab-Oberfläche in Office und macht Ihre Arbeit wesentlich einfacher
- Aktivieren Sie die Tabulator-Bearbeitung und das Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Tabs innerhalb desselben Fensters, statt in neuen Einzelfenstern.
- Steigert Ihre Produktivität um50 % und reduziert hunderte Mausklicks täglich!
Alle Kutools-Add-Ins. Ein Installationspaket
Das Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro und ist ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- All-in-One-Paket — Add-Ins für Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Ein Installationspaket, eine Lizenz — in wenigen Minuten einsatzbereit (MSI-kompatibel)
- Besser gemeinsam — optimierte Produktivität in allen Office-Anwendungen
- 30 Tage kostenlos testen — keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis — günstiger als Einzelkauf der Add-Ins