IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Création nombre de feuilles variable [XL-2007]


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Homme Profil pro
    Inscrit en
    Avril 2012
    Messages
    46
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Avril 2012
    Messages : 46
    Par défaut Création nombre de feuilles variable
    Bonjour,
    Voila je suis en train de faire une macro et je dois créer un nombre de feuilles variable en fonction d'une données d'une de mes feuilles et je ne comprend pas trop pourquoi il ne les fait pas.
    Voila le code
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    nbfeuilles = Sheets("donner traiter").Range("c11")
    For i = 1 To nbfeuilles
    Sheets.Add after:=Sheets(Worksheets.Count)
    With ActiveSheet
    Name = "cycle" & i
    End With
    Next

  2. #2
    Rédacteur
    Avatar de Philippe Tulliez
    Homme Profil pro
    Formateur, développeur et consultant Excel, Access, Word et VBA
    Inscrit en
    Janvier 2010
    Messages
    13 184
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Belgique

    Informations professionnelles :
    Activité : Formateur, développeur et consultant Excel, Access, Word et VBA

    Informations forums :
    Inscription : Janvier 2010
    Messages : 13 184
    Billets dans le blog
    53
    Par défaut
    Bonsoir,
    Comme ceci cela ira mieux
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    nbfeuilles = Sheets("Feuil2").Range("c11")
    For i = 1 To nbfeuilles
      Sheets.Add after:=Sheets(Worksheets.Count)
      Sheets(Worksheets.Count).Name = "Cycle" & i
    Next
    Philippe Tulliez
    Ce que l'on conçoit bien s'énonce clairement, et les mots pour le dire arrivent aisément. (Nicolas Boileau)
    Lorsque vous avez la réponse à votre question, n'oubliez pas de cliquer sur et si celle-ci est pertinente pensez à voter
    Mes tutoriels : Utilisation de l'assistant « Insertion de fonction », Les filtres avancés ou élaborés dans Excel
    Mon dernier billet : Utilisation de la fonction Dir en VBA pour vérifier l'existence d'un fichier

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [XL-2013] Création de différentes feuilles (nombre et noms variables)
    Par jenor dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 30/06/2015, 11h59
  2. [XL-2010] Moyenne de colonnes d'un nombre de feuilles variables
    Par Piixx_e dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 19/12/2013, 10h15
  3. Réponses: 1
    Dernier message: 15/06/2011, 10h57
  4. Réponses: 1
    Dernier message: 08/07/2009, 18h06
  5. Réponses: 4
    Dernier message: 08/08/2008, 13h38

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo