Incrémentation de formule VBA
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:
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 8-)
