Discussion :

[Lassine_kouyate]

Bonjour tout le monde !! Quelqu'un peut-il m'aider à savoir pourquoi ma formule ci-dessous donne une erreur, Merci d'avance.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Range("s7").FormulaLocal = "=SIERREUR(RECHERCHEV([@[No Compte]];Exceptions_Branche;3;FAUX);SI(OU([@class3]=""702"";[@class3]=""602"";[@class3]=""320"";[@class2]=""65"");DROITE(GAUCHE([@[No Compte]];8);3);""""))"

[Philippe Tulliez]

Bonjour,
Cela provient tout simplement des guillemets. Il faut les doubler ou utiliser une variable chaîne de caractères que l'on concatène

Voici deux exemples très simple

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Range("O10").FormulaLocal = "=""Toto"""

Avec concaténation d'une variable où chr(34) représente le caractère guillemet

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Dim Name As String
Name = Chr(34) & "Toto" & Chr(34)
Range("O10").FormulaLocal = "=" & Name

[Lassine_kouyate]

Merci beaucoup Philippe pour ta réponse. Mais dans mon code tous les guillemets sont doublés. Du coup le problème vient probablement d'autre chose

[Philippe Tulliez]

Bonjour,
Je n'avais pas vu qu'ils étaient déjà doublé
Quelle erreur le VBA renvoie t'il ?

[Lassine_kouyate]

Merci beaucoup pour ta disponibilité Philippe. Finalement j'ai résolu le problème, j'avais mal nommé mes colonnes. [@[Classe 3] au lieu de [@[Classe3]. Petite erreur de concentration. Merci infiniment