Déplacer une formule

Bonjour,
J'ai une formule en feuille 2 que je souhaite mettre en feuille 1 à une colonne et ligne différente.

Code:

---

1 2	sheets("a").cells(ligA,6)=sheets("b").cells(ligB,8)

---

Ca ne fonctionne pas, puisque ça me met la valeur et non la formule.
Si j'utilise

Code:

---

1 2	sheets("a").cells(ligA,6)=sheets("b").cells(ligB,8).formula

---

Ca ne fonctionne pas non plus, puisque ça me copie littéralement la formule sans tenir compte du déplacement de ligne ou de colonne.
Comment faire sans passer par un copy/paste ?
Merci

Citation:

---

Envoyé par l.flipper

Ca ne fonctionne pas non plus, puisque ça me copie littéralement la formule sans tenir compte du déplacement de ligne ou de colonne.
Comment faire sans passer par un copy/paste ?
Merci

---

Bonjour,

Je ne suis pas sur que ce soit possible sans copy/paste, pourquoi cette méthode ne convient pas?

Bonjour,

pourquoi éviter la méthode Copy ?

Code:

---

sheets("b").cells(ligB,8).Copy sheets("a").cells(ligA,6)

---

Citation:

---

Envoyé par joe.levrai

Bonjour,

pourquoi éviter la méthode Copy ?

Code:

---

sheets("b").cells(ligB,8).Copy sheets("a").cells(ligA,6)

---

---

Je voulais savoir si il y avait la possibilité de passer par un "=" mais vous avez raison cette méthode fonctionne parfaitement (je ne savais pas le faire sur une seule ligne de code).
Merci

Salut,

As-tu essayé :

Code:

---

Sheets("a").Cells(ligA, 6).FormulaLocal = Sheets("b").Cells(ligB, 8).FormulaLocal

---

?

Si tes formules utilisent le même décalage sur le 2 feuilles, tu peux essayer aussi en remplaçant FormulaLocal par FormulaR1C1Local (des 2 côtés du signe "=")

Bonjour,

ah oui ! encore une rencontre du grands esprits des Philippe(s) ;)

par contre la méthode copy à l’inconvénient de tout copier de la cellule source comme les bordures la couleur de la cellule etc

Donc si tu ne veux que la formule :

Code:

---

1 2	sheets("b").cells(ligB,8).Copy sheets("a").cells(ligA,6).PasteSpecial Paste:=xlPasteFormulas

---