Bonjour,
J'essaie de faire une fonction qui permette de décaler la formule d'une cellule sur toute une plage.
Ici, je mets les formules dans les cellules F10 à J10, et ensuite je veux glisser cette ligne jusqu'à la ligne 44.
Le numero de la ligne i ne doit pas changer quand je descend la formule (donc dans excel, ça serait avec un dollar devant, donc sans crochet sur vba?)
Et mon problème vient du fait que j'appliquerai cette formule dans divers cas, selon i qui est un numéro de ligne.. comment écrire cela??
J'ai essayé avec Ri, rows(i), cells(i,..) mais sans succès...
Voici ma fonction en vba:
J'espère avoir été claire sur mon problème, merci d'avance
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20 Function nom(i) Range("F10").Select ActiveCell.FormulaR1C1 = _ "=Feuil1!RiC[-3]/(1+Feuil2!RC1)^1" Range("G10").Select ActiveCell.FormulaR1C1 = _ "=Feuil1!Rows(i)C[-3]/(1+Feuil2!RC1)^2" Range("H10").Select ActiveCell.FormulaR1C1 = _ "=Feuil1!Rows(i)C[-3]/(1+Feuil2!RC1)^3" Range("I10").Select ActiveCell.FormulaR1C1 = _ "=Feuil1!Rows(i)C[-3]/(1+Feuil2!RC1)^4" Range("J10").Select ActiveCell.FormulaR1C1 = _ "=Feuil1!Rows(i)C[-3]/(1+Feuil2!RC1)^5" Range("F10:J10").Select Selection.AutoFill Destination:=Range("F10:J44"), Type:=xlFillDefault Range("F10:J44").Select End Function
Sophie
Partager