Conas luach meaitseála a bhreathnú agus a thabhairt ar ais le trácht cille?

Nuair a chuireann tú feidhm Vlookup i bhfeidhm chun an luach meaitseála a thabhairt ar ais, ní bhainfidh sé an luach ach gan an fhormáidiú, mar shampla dath líonta, cló nó trácht srl. Ach, uaireanta, b’fhéidir go mbeidh ort an luach comhoiriúnaithe lena n-áirítear trácht a aischur agus a thabhairt ar ais freisin chun an toradh scáileáin seo a leanas a fháil. Conas a d’fhéadfá an post seo a réiteach in Excel?

Luach meaitseála Vlookup agus faigh ar ais le trácht cille trí chód VBA a úsáid

Luach meaitseála Vlookup agus faigh ar ais le trácht cille trí chód VBA a úsáid

D’fhéadfadh go gcabhróidh an cód VBA thíos leat luach comhoiriúnaithe a bhreathnú agus a chur ar ais lena thrácht, déan mar a leanas:

1. Coinnigh síos an ALT + F11 eochracha a oscailt Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

2. Cliceáil Ionsáigh > Modúil, ansin cóipeáil agus greamaigh an cód seo a leanas sa Modúil Fuinneog.

Cód VBA: Luach meaitseála Vlookup agus faigh ar ais le trácht cille:

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. Agus ansin an cód a shábháil agus an fhuinneog cód a dhúnadh, iontráil an fhoirmle seo: = vlookupcomment (H2, A2: C10,3, BRÉAGACH) isteach i gcill bhán chun an toradh a aimsiú, agus brúigh Iontráil eochair, tugtar an luach comhoiriúnaithe chomh maith leis an trácht ar ais ag an am céanna, féach an pictiúr:

nótaí: San fhoirmle thuas, H2 an luach cuardaigh is mian leat a luach comhfhreagrach a thabhairt ar ais, A2: C10 an tábla sonraí a theastaíonn uait a úsáid, an uimhir 3 is í uimhir an cholúin ina bhfuil an luach comhoiriúnaithe a theastaíonn uait a thabhairt ar ais.