Come visualizzare e restituire il valore corrispondente con il commento della cella?
Quando applichi la funzione Vlookup per restituire il valore corrispondente, estrarrà solo il valore senza la formattazione, come il colore di riempimento, il carattere o il commento ecc. Ma, a volte, potrebbe essere necessario visualizzare e restituire il valore corrispondente incluso anche il commento per ottenere il seguente risultato dello screenshot. Come hai potuto risolvere questo lavoro in Excel?
Vlookup e restituisci il valore corrispondente con il commento della cella utilizzando il codice VBA
Vlookup e restituisci il valore corrispondente con il commento della cella utilizzando il codice VBA
Il codice VBA seguente può aiutarti a visualizzare e restituire il valore corrispondente con il suo commento, per favore fai come segue:
1. Tieni premuto il ALT + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.
2. Clic inserire > Moduli, quindi copia e incolla il codice seguente nel file Moduli Finestra.
Codice VBA: Vlookup e restituisce il valore corrispondente con il commento della cella:
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. Quindi salva il codice e chiudi la finestra del codice, inserisci questa formula: = vlookupcomment (H2, A2: C10,3, FALSE) in una cella vuota per individuare il risultato e premere entrare chiave, il valore corrispondente e il commento vengono restituiti contemporaneamente, vedi screenshot:
Note:: Nella formula sopra, H2 è il valore di ricerca che desideri restituire al valore corrispondente, A2: C10 è la tabella dati che desideri utilizzare, il numero 3 è il numero di colonna che contiene il valore corrispondente che si desidera restituire.
I migliori strumenti per la produttività in ufficio
Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo. Fai clic qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro
- Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
- Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!