Erreur de syntaxe

Question

Bonjour, 

J'essai de faire une macro qui recherche dans une colonne H l'un des mot présent dans la colonne A d'une autre feuille et s'il y a occurrence il copie le contenu de la cellule à droite de la colonne A dans la cellule 3 cellule à droite de la liste 1.

voila le code
Sub Test()
For Each x In Columns("H")
    For Each y In Worksheets("MC").Columns("A")
    strtext = y
    strtext = x
    If InStr(Start, UCase(x), UCase(y), vbTextCompare) Then
    y(, 1) = x(, 3)
    Next
Next

End Sub

Le problème est qu'une erreur de syntaxe apparait et met en surbrillance le x ici  y(, 1) = x(, 3) 

Configuration: Windows / Chrome 39.0.2171.99 

Merci d'avance pour vos réponse
Les guerre ne font que se succéder mais l'âme du guerrier reste éternel - TUPAC

NHenry · Answer

Si le IF et sa réalisation sont sur la même ligne, ça donne : 
IF condition THEN instruction [ELSE instruction]
Si il est multi-ligne : 
IF condition THEN
instruction
[ELSE
instruction]
END IF

Comme écrit dans l'aide.

Erreur de syntaxe

1 réponse

Votre réponse

Discussions similaires

Newsletters