[VBA-E]Utiliser une variable dans une formule

J'essaie de faire la chose suivante :VBA EXCEL
utiliser une variable pour changer ma formule au fur et à mesure de mes déplacements dans la feuille où je me trouve.('temp' est en réalité un compteur)

En bref : Je n'arrive utiliser la valeur de ma variable dans la formule d'index.

Je suis débutant:oops: , j'espère que ma question est assez explicite.

Merci d'avance de me désembourber si vous le pouvez !:arf:
Cordialement

BOSSU

Code:

---

1 2 3 4 5 6 7 8 9 10

Sub Macro1() Dim temp As Variant temp = 1 Range("i6").Select ActiveCell.FormulaR1C1 = _ "=INDEX(Feuil2!C[-2-temp],MATCH(Feuil1!RC[-2-temp],Feuil2!C[-3-temp],0))" End Sub

---

Bonjour et bienvenue sur ce forum.

Nous demandons, ici, de mettre un tag (regarde les autres discussions) dans le titre de la discussion (=titre du premier message) pour préciser l'environnement de développement.

Ensuite, entoure ton code de balises [code] à l'aide de l'icône http://www.developpez.net/forums/images/editor/code.gif située au-dessus de l'éditeur de message.

Bonne programmation.

Ceci dit, ce que tu cherches devrait ressembler à:

Code:

---

1 2	"=INDEX(Feuil2!C[-2-" & temp & "],MATCH(Feuil1!RC[-2-" & temp & _ "],Feuil2!C[-3-" & temp & "],0))"

---

Mais si le but est d'en faire une boucle pour remplir une série de cellules, regarde du côté de la méthode FillDown (ou FillRight) qui va incrémenter les références comme si tu faisais un "étirement" par la poignée de cellule dans Excel.

Ce n'est pas la solution : les ' " ' premettent d'inclure dans la formule de la cellule ,la variable en tant que paramétre de la formule, mais moi j'aimerais que ma variable influance directement mon paramètre de formule (sans qu'il soit affiché).
J'ai essayé quand même, mais ça n'a pas marché.

J'ai bien noté l'histoire du TAG et des balises de codes (la prochaine fois j'en tiendrai compte).
Je vois d'ailleurs que les autres questions sont en gras et pas celle ci, sans doute à cause de cette histoire de TAG.

Bon ben j'y retourne, en espérant qu'on aura une solution pour moi.

Merci encore ;)

Bossu:D

Citation:

---

Envoyé par bossu

(...)
J'ai bien noté l'histoire du TAG et des balises de codes (la prochaine fois j'en tiendrai compte).
(..)

---

tu peu toujours éditer ton premier message pour modifier le titre ( rajout tag..) et rajouter les balises de code ...

sinon peu-tu nous décrire à nouveau ton probléme, j'ai toujours pas compris ce que tu voulais faire..? il y devrai y avoir quoi dans temps ?

Je n'ai rien compris non plus :cry:

A+

Citation:

---

Envoyé par bossu

J'ai bien noté l'histoire du TAG et des balises de codes (la prochaine fois j'en tiendrai compte).

---

Le temps que tu frappes cette phrase, tu aurais pu le faire pour cette discussion-ci.
Je l'ai fait pour toi.
C'est autant de temps en moins pour répondre à ta question et à celles des autres.

Citation:

---

Envoyé par bossu

Je vois d'ailleurs que les autres questions sont en gras et pas celle ci, sans doute à cause de cette histoire de TAG.

---

Non, les discussions en gras sont celles que tu n'as pas lues.

En fait j'ai une formule simple du type :
=E8+F8; je veux qu'à chaque fois que je passe ma macro elle se déplace à droite mais reste =E8+F8.

Le code de cette formule est :

Code:

---

1 2	ActiveCell.FormulaR1C1 = "=RC[-1]+RC[-2]"

---

Je ne peux pas utiliser FillRight puisque je ne veux pas que mon adressage change.:cry:

Ma variable "temp" me servirait à garder mon adressage fixe :
à chaque passage de la macro temp = temp +1
Et comme j'avance d'une cellule dans ma feuille il faut que la formule devienne:

Code:

---

1 2	ActiveCell.FormulaR1C1 = "=RC[-2]+RC[-3]"

---

Je dois donc utiliser temp pour soustraire 1 de plus à chaque fois que je passe à une cellule suivante.

J'espère que cette reformulation vous permettra de m'aider.
A bientôt

Merci d'avance. :coucou:

Et

Code:

---

ActiveCell.FormulaR1C1 = "=RC5+RC6"

---

ne te convient pas?

Utilise des adresses absolues
=$E$8+$F$8

Si tu recopies ça dans n'importe quelle cellule de la feuille, tu auras toujours =$E$8+$F$8

Tu dis

A+

Dans

Code:

---

ActiveCell.FormulaR1C1 = "=RC5+RC6"

---

R est relatif et C5 et C6 sont absolus.
Il n'y a qu'à regarder le résultat généré, dans la cellule, par cette instruction.

Et donc, un FillRight pourrait partaitement convenir.

Pour que la formule =$E$8+$F$8 suive le N° de ligne, tu peux écrire
ActiveCell.Formula = "=$E8+$F8"
Recopiée vers le bas, elle suivra le N° de ligne =$E9+$F9, =$E10+$F10, ...
Solution qui n'est pas en contradiction avec celle d'AlainTech ;)

A+

En effet vous avez tous raison. :king:

Je me sens un peu couillon là !
Si si si.... :marteau:

Bon en tout cas merci beaucoup à tous d'avoir passé du temps sur mon problème et à bientôt.

Votre site est vraiment bien.

Bossu:D