Je suis debutant en VB, j'ai un souci...
Je souhaite appliquer une formule sur les cellules de la colonne "L:L", si les cellules de la colonne "A:A" ne sont pas vides. A la premiere cellule vide de la colonne "A:A" (fin de mes datas), on arrete d'appliquer la formule.
Pour l'instant j'applique betement la formule de la cellule "L2" a "L2000", mon soucis est que mon nombre de ligne peut etre variable. D'ou le soucis d'adaptation. Mon code est dessous:
Merci.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 Range("L2").Select ActiveCell.FormulaR1C1 = _ "=IF(RC[-5]="""","""",IF(RC[-5]="""","""",RC[-5]&""_""&(RC[-4]+100)&""_""&(RC[-3]+100)))" Range("L2").Select Selection.AutoFill Destination:=Range("L2:L2000"), Type:=xlFillDefault Range("L2:L2000").Select
Partager