guillemets genants

[gribouille]

Bonjour,

Je souhaite intégrer une formule via vba, mais lorsque j'entre ceci :

ActiveCell.FormulaR1C1 = '=IF(VLOOKUP(F2;'fichier.xls]tableau'!$B$2:$E$100;4;FALSE)<>'NON';'';'DEL')'

j'ai une erreur parceque le module vba ne comprend la ligne que jusqu'au second guillemet (juste avant le NON).

Que dois-je faire ?

 

[Dan]

Bonjour,


Essaie ceci :

ActiveCell.FormulaR1C1 = '=IF(VLOOKUP(F2;'fichier.xls]tableau'!$B$2:$E$100;4;FALSE)<>''NON'';'''';''DEL'')'

Bon travail

 

[gribouille]

Merci beaucoup... je viens d'essayer , mais j'obtiens une run-time error '1004' 'Application defined or object defined error'

 

[gribouille]

C'est bon, j'ai trouvé.....
C'est une affaire de , à la place de ; et aussi une autre manière de définir des cellules....


FormulaR1C1 = '=IF(VLOOKUP(RC[-3],'fichier.xls]tableau'!R2C2:R100C5,4,FALSE)<>''NON'','''',''DEL'')'