Recherchev avec VBA
Résolu
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!
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
-
ContributeurBonjour,
FormulaR1C1 c'est pour des adresses relatives
ActiveCell.Formula = "=RECHERCHEV(E2,Visite!A2:J1188,9,0)"
ira probablement mieux.
A+ -
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 -
Merci pour vos réponses! Avec Formula, cela marche en effet beaucoup mieux!
