Bonjour à vous tous,

voilà je vous explique mon problème:
J'ai un bout de code en VBA qui me permet de coller une formule à chaque nouvelle ligne :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
'BOUCLE POUR TROUVER LA PREMIERE LIGNE VIDE           
Do While Sheets("BDD").Cells(numligne, 11).Value <> ""
                           numligne = numligne + 1
                           Loop
 
            Sheets("BDD").Cells(numligne, 12) = "=IF(J3=""H"",C3+8,IF(J3=""M"",C3+31,IF(J3=""I"",C3+93,IF(J3=""C"",C3))))"
Ma problèmatique c'est que la cellule (J3) reste similaire et ne s'incremente pas de +1 à chaque nouvelle ligne.

Connaissez-vous une astuce pour ma formule s'adapte à la ligne suivante à chaque nouvelle incrementation?

Merci d'avance

Skull