[VBA] Boucle avec while
Bonjour,
Pour m'exercer je suis en train de chercher comment faire des boucles qui peut s'avérer être très utile
J'ai 2 colonnes
A B
1 =somme(A1;A2)
1
1
1
1Un truc très simple, je veux faire un Selection.AutoFill Destination de B1 tant qu'il y a quelque chose sur la colonne de gauche.
Donc j'essaie avec cette forme la :
Range("B1").Select
While ActiveCell.Offset(0, -1).Value <> ""
Selection.AutoFill Destination:=Range("B1:B")
Wend
Mais de toute évidence mon range d'autofill n'est pas correct, que faut-il mettre ici ?
Si quelqu'un pouvait me filer un coup de main
Bonjour,
Si ta formule est en B2 tu écris
Range([B2], [A65536].End(xlUp).Offset(0, 1)).Select
Selection.FillDown
Oui mais justement si je veux apprendre à faire des boucles de comparaison c'est pour éviter de faire des recopies sur tout le tableau excel tu vois
Bonjour,
Sub Recopie()
Range("A2").Select
Do While Not IsEmpty(ActiveCell)
ActiveCell.Offset(0, 1).Value = "Ma formule"
ActiveCell.Offset(1, 0).Select
Loop
End Sub
Excellent, merci RENAUDER !
J'y vois plus clair maintenant.