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 :

Renommé une feuille excel [XL-2003]


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Inscrit en
    Janvier 2009
    Messages
    33
    Détails du profil
    Informations forums :
    Inscription : Janvier 2009
    Messages : 33
    Par défaut Renommé une feuille excel
    Bonjour,

    Je souhaite renommé une feuille de mon classeur Excel avec le contenu d'une case fixe "A2" en utilisant une macro.

    Es possible et si oui avec quel code ?

    Merci d'avance de votre réponse

  2. #2
    Membre Expert Avatar de Krovax
    Profil pro
    Inscrit en
    Juillet 2008
    Messages
    1 888
    Détails du profil
    Informations personnelles :
    Âge : 39
    Localisation : France

    Informations forums :
    Inscription : Juillet 2008
    Messages : 1 888
    Par défaut
    Bonjour,
    Tout simplement

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    worksheets("Feuil1").name =worksheets("Feuil1").range("A2")

  3. #3
    Membre averti
    Inscrit en
    Janvier 2009
    Messages
    33
    Détails du profil
    Informations forums :
    Inscription : Janvier 2009
    Messages : 33
    Par défaut
    Ah excuse moi, j'ai oublié de préciser que ma feuille est variable, j'aimerai qu'il change le nom de la feuille active en fait, peu importe son nom de départ.

  4. #4
    Membre Expert Avatar de Krovax
    Profil pro
    Inscrit en
    Juillet 2008
    Messages
    1 888
    Détails du profil
    Informations personnelles :
    Âge : 39
    Localisation : France

    Informations forums :
    Inscription : Juillet 2008
    Messages : 1 888
    Par défaut
    Et adapter le code aurait été difficile?
    Allez voila la solution
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    ActiveSheet.Name = ActiveSheet.Range("A2")

  5. #5
    Membre Expert Avatar de aalex_38
    Inscrit en
    Septembre 2007
    Messages
    1 631
    Détails du profil
    Informations forums :
    Inscription : Septembre 2007
    Messages : 1 631
    Par défaut
    Bonjour à tous,

    Une solution pour mordre ou finir une feuille de classeur

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Dim FL as worksheet
    set FL = ActiveSheet ' Worksheet("nomdelafeuille")
    FL.NAME = "LenouveauNom"

  6. #6
    Membre averti
    Inscrit en
    Janvier 2009
    Messages
    33
    Détails du profil
    Informations forums :
    Inscription : Janvier 2009
    Messages : 33
    Par défaut
    Je savais qu'il n'y avait pas grand chose à changer !!
    Merci Krovax

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

Discussions similaires

  1. [XL-2002] Renommer une feuille excel par programme
    Par Touffe54 dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 12/11/2011, 14h06
  2. Renommer les colonnes d'une feuille excel
    Par cyberboy00 dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 08/04/2008, 15h09
  3. renommer une feuille d'un fichier excel depuis Access en VBA
    Par alexkickstand dans le forum VBA Access
    Réponses: 2
    Dernier message: 23/08/2007, 17h55
  4. [VBA-E]copier et renommer une feuille excel
    Par la-breche dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 14/03/2007, 13h49
  5. Renommer une feuille Excel selon table/Access
    Par PAULOM dans le forum Access
    Réponses: 3
    Dernier message: 24/04/2006, 15h32

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