creation multiple de feuille

phlaurent55

Nous a quittés en 2020

Repose en paix

• 1 Mai 2009

• #2

Re : creation multiple de feuille

Bonsoir Angoul,

avec ceci

Code:

For i = 1 To 30
    Sheets.Add
Next i

 

Vote positif 0 Vote négatif

A

angoul

XLDnaute Impliqué

• 1 Mai 2009

• #3

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

 

Vote positif 0 Vote négatif

phlaurent55

Nous a quittés en 2020

Repose en paix

• 1 Mai 2009

• #4

Re : creation multiple de feuille

Re,
voir fichier joint

 

Pièces jointes

• 111.xls

  16.5 KB · Affichages: 60
• 111.xls

  16.5 KB · Affichages: 67
• 111.xls

  16.5 KB · Affichages: 58

Vote positif 0 Vote négatif

A

angoul

XLDnaute Impliqué

• 1 Mai 2009

• #5

Re : creation multiple de feuille

merci c'est super sympa de ta part

 

Vote positif 0 Vote négatif

vbacrumble

XLDnaute Accro

• 2 Mai 2009

• #6

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

Code:

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

 

Vote positif 0 Vote négatif