Bonjour à tous,

voilà étant débutant en vb, je cherche à exécuter des fonction insert et update sur une plage donnée.

Cependant, je dois écrire autant de fois la fonction range qu'il y a de lignes à insérer ou updater!

Exemple de fonction que je veux faire :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Sub lignes()
 
    Range("AD2:AG2,AH2").Select
    Range("AH2").Activate
    Run "VB_Launch_request"
 
    Range("AD3:AG3,AH3").Select
    Range("AH3").Activate
    Run "VB_Launch_request"
 
etc.......
 
End Sub
Ma question est comment faire pour qu'il le fasse autant de fois qu'il y a de lignes remplies?

Merci d'avance.