Rajouter plusieurs onglets sur VBA

Magz -  
Gyrus Messages postés 3334 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

Alors voilà, j'ai une base de données sur un fichier excel. Je calcule déjà le nombre de valeurs différentes que j'ai dans une colonne et obtiens 96. Ce que je voudrai c'est créer une macro qui me créerai autant d'onglets que j'ai de valeurs (96). Parce que bon, rajouter 96 onglets à la main c'est un peu long...

Est-ce que quelqu'un saurai m'aider?

Merci! :)

1 réponse

Gyrus Messages postés 3334 Date d'inscription   Statut Membre Dernière intervention   526
 
Bonjour,

Sub Test()
Dim i As Integer
For i = 1 To 96
Sheets.Add After:=ActiveSheet
Next i
End Sub

A+
0