mexitinoco
XLDnaute Nouveau
Bonjour à tous,
Voilà je cherche à faire une boucle sur VBA qui permettrait de détecter si une cellule (A1 par exemple) de la première feuille de classeur est vide, si elle est pleine, alors Excel créé un nouvel onglet puis il passe à la cellule du dessous : A2. Si celle-ci contient quelque chose, alors un nouvel onglet est créé, et ainsi de suite jusqu'à ce qu'Excel tombe sur une cellule vide.
J'ai donc écris le code ci-dessous mais il ne marche pas et je ne vois pas ce qui cloche :
Sub test()
Sheets(1).Select
Dim A As Integer, B As Integer
A = 1
B = 1
While Not IsEmpty(Cells(A, 12))
Sheets.Add After:=Sheets(1)
Sheets(2).Name = "FORMAT B"
A = A + 1
B = B + 1
Wend
End Sub
Si vous avez des propositions je suis preneur !
Voilà je cherche à faire une boucle sur VBA qui permettrait de détecter si une cellule (A1 par exemple) de la première feuille de classeur est vide, si elle est pleine, alors Excel créé un nouvel onglet puis il passe à la cellule du dessous : A2. Si celle-ci contient quelque chose, alors un nouvel onglet est créé, et ainsi de suite jusqu'à ce qu'Excel tombe sur une cellule vide.
J'ai donc écris le code ci-dessous mais il ne marche pas et je ne vois pas ce qui cloche :
Sub test()
Sheets(1).Select
Dim A As Integer, B As Integer
A = 1
B = 1
While Not IsEmpty(Cells(A, 12))
Sheets.Add After:=Sheets(1)
Sheets(2).Name = "FORMAT B"
A = A + 1
B = B + 1
Wend
End Sub
Si vous avez des propositions je suis preneur !