Traduction VBA de la fonction decaller

Bonjour;

J'arrive pas à traduire la fonction excel suivante

Code:

---

=SI(AE$9<=DATE($T$1;$V$1;1);DECALER($AD10;0;-($V$1-MOIS(AE$9)));0)

---

en language VBA.
J'ai utlisé l'enregistrement de macro mais quand je la colle ca marhce pas

Au fait ce que j'ai pas su traduire c le "-($V$1-MOIS(AE$9)"


Merci

si tu remplis un range avec une formule pas besoin de la traduire:

Code:

---

range("A1").formulalocal="ma formule"

---

Pour l'enregistreur je ne comprend pas tes explications, tu lances l'enregistrement tu rentres dans ta formule (déjà renseignée auparavant) puis
F2 et entrée. Dans la macro tu auras la traduction.

Sur ce forum beaucoup te diront qu'il est préférable de conserver la formule anglaise, pour une question de compatibilité avec l'ensemble des versions d'Excel.

Bonjour;Merci pour ta reponseCependant, ça n'a pas marché chez moi Voici le code que j'ai utilisé

Code:

---

1 2 3 4 5 6 7 8 9

Sub decaler() Dim ligne As Integer, colonne As IntegerFor ligne = 10 To Cells(Rows.Count, 1).End(xlUp).Row For colonne = 31 To 78 If Cells(9, colonne) < Cells(1, 23) ThenRange("AD10").offset(0,2) End If Next colonne Next ligne End Sub

---

Merci