[EXCEL VBA] Formule à indice varible

Fermé
shinji7800 Messages postés 297 Date d'inscription mercredi 7 novembre 2007 Statut Membre Dernière intervention 30 septembre 2010 - 27 févr. 2009 à 08:53
lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 - 27 févr. 2009 à 10:14
Bonjour,

je cherche a copier dans une cellule la formule suivante :

ActiveCell.FormulaR1C1 = "=RECHERCHEV ('27302_090109_083320'!D" & j & ";[LISTE_CODE.xls]LISTECODE!$A$1:$DB$667;1;FAUX)"


"j" étant déclaré et initialisé

le problème est que cette ligne de code dans l'état génère une erreur 1004

si je supprime "=" de "=RECHERCHEV...." la ligne est bien copié dans la cellule sélectionnée ... mais du coup ce n'est plus une fonction :)

si vous avez des idées pour me faire avancer je vous en serez reconnaissant ! merci par avance !
A voir également:

6 réponses

lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
27 févr. 2009 à 09:01
Bonjour,
"j" étant déclaré et initialisé
Où et/ou comment ?
A+
0
shinji7800 Messages postés 297 Date d'inscription mercredi 7 novembre 2007 Statut Membre Dernière intervention 30 septembre 2010 47
27 févr. 2009 à 09:31
Bonjour, lermite222

le probleme ne viens pas de la je pense ... puisque lorsque je supprime le "=" cela "fonctionne"


merci pour ta réponse :)
0
lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
27 févr. 2009 à 09:41
Mais si....
Il n'y a plus d'erreur PARCE QU'IL N'Y A PLUS DE FORMULE !!
Ce serais mieux que tu réponde à ma question :-)
0
wilfried_42 Messages postés 907 Date d'inscription mardi 19 août 2008 Statut Contributeur Dernière intervention 8 décembre 2009 242
27 févr. 2009 à 09:51
Bonjour shinji7800, lermite222

on va deja modifier une propriété
ActiveCell.FormulaLocal = "=RECHERCHEV ('27302_090109_083320'!D" & j & ";[LISTE_CODE.xls]LISTECODE!$A$1:$DB$667;1;FAUX)"

Utiliser FormulaR1C1 avec des référence de type A1:DB667, je doute que cela fonctionne
De plus tu utilises une formule en français alors FormulaLocal qui indique la mise en place d'une formule dans la langue local.

je ne vois rien d'autre pour l'instant mais si l'erreur persiste, un bout plus long de la macro est nécessaire
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
27 févr. 2009 à 10:09
Je pense que j'ai trouver ton erreur..
    ActiveCell.Formula = "=RECHERCHEV(A" & j & ",Feuil3!A2:C32,2)"

J'ai pas tester avec autre classeur, mais tu ne doit pas employer FormulaR1C1
A+
0
lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
27 févr. 2009 à 10:14
Bonjour Wilfried,
Le temps que je trouve, tu avais déja répondu.
Concernant FormulaLocal ce n'est pas nécessaire, les deux versions sont disponnibles.
Si tu fais la formule avec l'éditeur de macro il te met =VLOOKUP et ça fonctionne ausi.
A+
0