[EXCEL VBA] Formule à indice varible

shinji7800 Messages postés 297 Date d'inscription   Statut Membre Dernière intervention   -  
lermite222 Messages postés 8724 Date d'inscription   Statut Contributeur Dernière intervention   -
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

Réponse 1 / 6
lermite222 Messages postés 8724 Date d'inscription   Statut Contributeur Dernière intervention   1 191
 
Bonjour,
"j" étant déclaré et initialisé
Où et/ou comment ?
A+
0
Réponse 2 / 6
shinji7800 Messages postés 297 Date d'inscription   Statut Membre Dernière intervention   47
 
Bonjour, lermite222

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


merci pour ta réponse :)
0
Réponse 3 / 6
lermite222 Messages postés 8724 Date d'inscription   Statut Contributeur Dernière intervention   1 191
 
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
Réponse 4 / 6
wilfried_42 Messages postés 907 Date d'inscription   Statut Contributeur Dernière intervention   245
 
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
Réponse 5 / 6
lermite222 Messages postés 8724 Date d'inscription   Statut Contributeur Dernière intervention   1 191
 
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
Réponse 6 / 6
lermite222 Messages postés 8724 Date d'inscription   Statut Contributeur Dernière intervention   1 191
 
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