Excel VBA Type Mismatch für # N / A

Ich habe dieses Stück Code

    With Data.Cells(rowMatch, GWECol)
        .Value = Cmp.Cells(i, GWENetPr)
        .AddComment
        .Comment.Text Text:=UCase(Environ("UserName")) & ":" & vbNewLine _
            & "Comment: " & Cmp.Cells(i, CommCol) & vbNewLine _
            & "Transaction: " & Cmp.Cells(i, QRTran) & vbNewLine _
            & "QR Pr: " & Cmp.Cells(i, QRPr) & vbNewLine _
            & "QR WD: " & Cmp.Cells(i, QRWD) & vbNewLine _
            & "QR WD All: " & Cmp.Cells(i, QRWDA) & vbNewLine _
            & "QR XPr: " & Cmp.Cells(i, QRXPr) & vbNewLine _
            & "QR XAll: " & Cmp.Cells(i, QRXAll) & vbNewLine _
            & "GWE Pr: " & Cmp.Cells(i, GWEPr) & vbNewLine _
            & "GWE All: " & Cmp.Cells(i, GWEAll) & vbNewLine _
            & "GWE XPr: " & Cmp.Cells(i, GWEXPr) & vbNewLine _
            & "GWE XAll: " & Cmp.Cells(i, GWEXAll)
        .Comment.Shape.TextFrame.AutoSize = True
    End With

Wobei sich Cmp.Cells (i, X) auf Zellen bezieht, die möglicherweise den Fehler # N / A aufweisen (ein fehlgeschlagenes VLOOKUP).

Ist es möglich, dass der Code nur die # N / A als Zeichenfolge aufnimmt oder einfach leer lässt? Im Moment schlägt der Block fehl, wenn eine der Zellen, auf die verwiesen wird, # N / A ist, und es wird überhaupt kein Kommentartext hinzugefügt.

Vielen Dank!

Antworten auf die Frage(4)

Ihre Antwort auf die Frage