VBA Excel: impossible d'obtenir une correspondance, d'erreur “Impossible d'obtenir la propriété Correspondance de la classe WorksheetFunction”

Pour l'amour de tout ce qui est bon, je n'arrive pas à obtenir que cela fonctionne. Je reçois l'erreur mentionnée ci-dessus.

J'ai cette table, et je vais essayer de savoir si le code correspond à son propre sous-code quelque part à l'intérieur de la colonne autre, cependant, il est erroring arrière. Votre aide est grandement appréciée.

VBA Excel: impossible d'obtenir une correspondance, d'erreur “Impossible d'obtenir la propriété Correspondance de la classe WorksheetFunction”

Sub testing()

    Dim m1 As long
    Dim myrange As Range

    Set myrange = Worksheets("Sheet1").Range("B2:B23")

    For e = 2 To 23
        m1= Application.WorksheetFunction.Match(Cells(e, 1).Value, myrange, 0)

        If m1 > 0 Then
            Cells(e, 3).Value = "Yes"
        Else
            Cells(e, 3).Value = "No"
        End If
    Next e

MsgBox "Complete!"

End Sub
David réponse est bonne, mais pourquoi ne pas simplement mettre la formule dans la colonne C?
Salut Doug, j'ai besoin d'utiliser ce en collaboration avec les autres fonctions que j'aimerais faire plus tard, je ne peut être fait de manière optimale par du code VBA.

OriginalL'auteur Humble Val | 2013-07-19

Leave a Reply

Votre adresse de messagerie ne sera pas publiée. Les champs obligatoires sont indiqués avec *