Ajouter plusieurs feuilles les une à la suite de l'autre VBA
Résolu
stroub
Messages postés
1
Statut
Membre
-
Heliotte Messages postés 1561 Statut Membre -
Heliotte Messages postés 1561 Statut Membre -
Bonjour,
J'essaye de créer plusieurs feuilles Excel (au max 3) les une à la suite de l'autre à l'aide d'un bouton sous VBA. J'ai essayer avec ceci mais ça ne marche :
Private Sub cmd_enregistrer_Click()
Dim C As Integer
While C < 3
Sheets.Add After:=Worksheets(Worksheets.Count)
ActiveSheet.Name = "Compétition" & Format(C, "00")
C = C + 1
Wend
End Sub
Donc ce que je voudrais c'est ajouter une première feuille nommée Compétition 01 puis en cliquant une deuxième fois sur le bouton ajouter une deuxième feuille nommée Compétition 02 ... alors que là ça les ajoute toutes les trois d'un seul coup.
Merci d'avance pour vos réponses.
J'essaye de créer plusieurs feuilles Excel (au max 3) les une à la suite de l'autre à l'aide d'un bouton sous VBA. J'ai essayer avec ceci mais ça ne marche :
Private Sub cmd_enregistrer_Click()
Dim C As Integer
While C < 3
Sheets.Add After:=Worksheets(Worksheets.Count)
ActiveSheet.Name = "Compétition" & Format(C, "00")
C = C + 1
Wend
End Sub
Donc ce que je voudrais c'est ajouter une première feuille nommée Compétition 01 puis en cliquant une deuxième fois sur le bouton ajouter une deuxième feuille nommée Compétition 02 ... alors que là ça les ajoute toutes les trois d'un seul coup.
Merci d'avance pour vos réponses.
A voir également:
- Ajouter plusieurs feuilles les une à la suite de l'autre VBA
- Comment faire un livret avec des feuilles a4 - Guide
- Regrouper plusieurs feuilles excel en une seule - Guide
- Bruler les feuilles de laurier - Guide
- Ajouter à l'écran d'accueil iphone - Guide
- Ajouter une signature sur word - Guide
Tu devrais aussi sauvegarder et utiliser c dans une cellule si tu veux reprendre le compte à la réouverture du classeur.
Sinon ça va t'obliger à ajouter une boucle sur toutes les feuilles pour avoir le dernier n° utilisé.
eric