Recherchev avec VBA

Résolu
Antoine -  
 Antoine -
Bonjour,

Je rencontre deux problèmes sous VBA avec la fonction .FormulaR1C1:

Voici mon code:

Worksheets("CS").activate
Range("O2").select

ActiveCell.FormulaR1C1 = "=RECHERCHEV(E2,Visite!A2:J1188,9,0)"

Lorsque je le lance, la formule s'inscrit bien dans la cellule demandée mais des ' apparaissent partout. Dans la cellule "O2", ca donne : =RECHERCHEV('E2';'Visite!'A2':'J1188';9;0), ce qui invalide la formule.

Le deuxième problème concerne les "$". de ce que j'ai compris en cherchant sur internet, c'est que VBA ne les acceptait pas. Mais je n'ai pas compris comment contourner le problème.

Merci d'avance pour votre aide!




3 réponses

lermite222 Messages postés 8724 Date d'inscription   Statut Contributeur Dernière intervention   1 191
 
Bonjour,
FormulaR1C1 c'est pour des adresses relatives

ActiveCell.Formula = "=RECHERCHEV(E2,Visite!A2:J1188,9,0)" 

ira probablement mieux.
A+
0
ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   2 433
 
bonjour à tous les deux

ou peut etre FormulaLocal qui "définit la formule de l'objet, en utilisant les références du style A1 dans le langage de l'utilisateur"

ActiveCell.FormulaLocal = "=RECHERCHEV(E2,Visite!A2:J1188,9,0)"

bonne suite
0
Antoine
 
Merci pour vos réponses! Avec Formula, cela marche en effet beaucoup mieux!
0