creation multiple de feuille

[angoul]

Bonjour
j'ai une fichier excel est j'ai besoin de creer plein de feuille dedans, environ 25 a 30, y a t'il un moyen rapide pour creer c'est feuille d'un seul coup.

merci d'avance

 

[phlaurent55]

Re : creation multiple de feuille

Bonsoir Angoul,

avec ceci

For i = 1 To 30
    Sheets.Add
Next i

 

[angoul]

Re : creation multiple de feuille

merci de ta reponse, mais peut tu me dire comment et ou mettre ce code
car je sait pas quoi en faire
cordialement

 

[phlaurent55]

Re : creation multiple de feuille

Re,
voir fichier joint

 

[angoul]

Re : creation multiple de feuille

merci c'est super sympa de ta part

 

[vbacrumble]

Re : creation multiple de feuille

Bonjour


Une autre façon

(Qui corresponds à Outils/Options/Général: -> Nombre de feuilles calcul par nouveau classeur)

Ainsi quand tu créées un nouveau classeur par défaut, il possède 30 feuilles

Sub Macro1()
'
' Macro1 Macro
' Macro enregistrée le 02/05/2009 par VBACrumble
'
    With Application
        .StandardFont = "Arial"
        .StandardFontSize = "10"
        .DefaultFilePath = "C:\Temp"
        .SheetsInNewWorkbook = 30
        .EnableSound = False
        .RollZoom = False
    End With
    Workbooks.Add
End Sub