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 :

[VBA-E] Nom d'onglet automatique


Sujet :

Macros et VBA Excel

  1. #1
    Membre éclairé
    Femme Profil pro
    Technicienne en informatique
    Inscrit en
    Février 2004
    Messages
    257
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : Canada

    Informations professionnelles :
    Activité : Technicienne en informatique
    Secteur : Agroalimentaire - Agriculture

    Informations forums :
    Inscription : Février 2004
    Messages : 257
    Par défaut [VBA-E] Nom d'onglet automatique
    Bonjour,

    Je voudrais savoir s'il est possible de récupérer l'événement lorsqu'on renomme un onglet? Sinon, est-il possible qu'une cellule prennent automatiquement le nom de l'onglet dans lequel il se trouve?

    Présentement, je n'ai aucun problème pour récupérer le nom de l'onglet, mais lorsque je renomme l'onglet, la cellule dans laquelle j'inscris le nom ne s'ajuste pas automatiquement.

    Merci pour votre aide

  2. #2
    Membre Expert Avatar de Megaxel
    Profil pro
    Inscrit en
    Mai 2003
    Messages
    1 187
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2003
    Messages : 1 187
    Par défaut
    Ha ben là... J'avoue que je reste sec.
    Je n'avais jamais pensé à ce événement...
    C'est indiscret de savoir pourquoi tu répètes le nom de l'onglet dans une cellule? Parce que si personne n'arrive à faire ce que tu veux, peut-être qu'on pourrait contourner le problème.

  3. #3
    Membre éclairé
    Femme Profil pro
    Technicienne en informatique
    Inscrit en
    Février 2004
    Messages
    257
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : Canada

    Informations professionnelles :
    Activité : Technicienne en informatique
    Secteur : Agroalimentaire - Agriculture

    Informations forums :
    Inscription : Février 2004
    Messages : 257
    Par défaut
    C'est parce que mes onglets se nomment ex. "Projet 1". Par contre, si l'utilisateur a plus d'un projet il doit copier l'onglet et le renommer ex. "Projet 2". J'ai besoin d'une cellule dans laquelle je pourrai inscrire le numéro du projet parce qu'après j'importe le fichier excel dans Access et je ne peux pas avoir deux projets avec le même numéro et je ne veux pas que l'utilisateur ait le choix du numéro question de validation.

    J'espère que mon explication vous éclaire un peu.

    Merci

  4. #4
    Membre Expert Avatar de Megaxel
    Profil pro
    Inscrit en
    Mai 2003
    Messages
    1 187
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2003
    Messages : 1 187
    Par défaut
    D'accord. Et quand tu fais ton export vers access, pourquoi ne récupères-tu pas le nom du projet dans l'étiquette de l'onglet (ActiveWorkSheet.Name), au lieu de le prendre dans une cellule redondante, avec le nom de l'onglet répétée là?

  5. #5
    Inactif  
    Avatar de ouskel'n'or
    Profil pro
    Inscrit en
    Février 2005
    Messages
    12 464
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 12 464
    Par défaut
    Qu'appelles-tu un onglet ? Le nom de la feuille de calcul ?
    Dans l'ignorance, je te propose toujours ça
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Cells(1,1).value = activeSheet.name
    mais comme ça me paraît évident, et que megachose était "sec", j'ai un doute

    A+

  6. #6
    Membre éclairé
    Femme Profil pro
    Technicienne en informatique
    Inscrit en
    Février 2004
    Messages
    257
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : Canada

    Informations professionnelles :
    Activité : Technicienne en informatique
    Secteur : Agroalimentaire - Agriculture

    Informations forums :
    Inscription : Février 2004
    Messages : 257
    Par défaut
    C'est sûr que pour l'export c'est faisable mais on m'a demandé de l'afficher dans le formulaire excel puisqu'il pourrait arriver qu'on imprime ce formulaire.

  7. #7
    Membre Expert Avatar de Megaxel
    Profil pro
    Inscrit en
    Mai 2003
    Messages
    1 187
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2003
    Messages : 1 187
    Par défaut
    Ousk, comment déclenches-tu ton bout de code? Il n'y a pas d'événement déclenché par le changement de nom d'un onglet. Si?

  8. #8
    Membre éclairé
    Femme Profil pro
    Technicienne en informatique
    Inscrit en
    Février 2004
    Messages
    257
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : Canada

    Informations professionnelles :
    Activité : Technicienne en informatique
    Secteur : Agroalimentaire - Agriculture

    Informations forums :
    Inscription : Février 2004
    Messages : 257
    Par défaut
    Non, c'est justement ce que je cherche.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Cells(1,1).value = activeSheet.name
    fonctionne oui mais il ne s'active pas automatiquement si je change le nom de l'onglet.

  9. #9
    Expert confirmé

    Profil pro
    Inscrit en
    Mai 2005
    Messages
    3 419
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2005
    Messages : 3 419
    Par défaut
    après enregistrement du fichier
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
    =STXT(CELLULE("nomfichier");CHERCHE("]";CELLULE("nomfichier");1)+1;NBCAR(CELLULE("nomfichier"))-CHERCHE("]";CELLULE("nomfichier")))

  10. #10
    Membre éclairé
    Femme Profil pro
    Technicienne en informatique
    Inscrit en
    Février 2004
    Messages
    257
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : Canada

    Informations professionnelles :
    Activité : Technicienne en informatique
    Secteur : Agroalimentaire - Agriculture

    Informations forums :
    Inscription : Février 2004
    Messages : 257
    Par défaut
    J'ai besoin que la cellule s'ajuste automatiquement lors de la modification et non lors de la fermeture sinon ça peut porter à confusion pour l'utilisateur qui voit que son no de projet est le même que la feuille d'avant.

  11. #11
    Membre éclairé
    Femme Profil pro
    Technicienne en informatique
    Inscrit en
    Février 2004
    Messages
    257
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : Canada

    Informations professionnelles :
    Activité : Technicienne en informatique
    Secteur : Agroalimentaire - Agriculture

    Informations forums :
    Inscription : Février 2004
    Messages : 257
    Par défaut
    Y'a peut-être une petite solution mais c'est pas la meilleure. J'utilise l'événement

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
        Cells(12, 15) = Mid(ActiveSheet.Name, 8)
    End Sub
    Mais il la cellule ne change que si je clique ailleurs dans la feuille. C'est mieux que rien.

    Mais si vous avez une meilleure idée, ne vous gênez pas!!!

    Merci pour votre aide

  12. #12
    Expert confirmé

    Profil pro
    Inscrit en
    Mai 2005
    Messages
    3 419
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2005
    Messages : 3 419
    Par défaut
    le nom de feuille se met automatiquement
    donc sur
    Private Sub Workbook_NewSheet tu peux mettre ma formule en a1

    si ca ne suit pas tu transféres la formule dans une fonction avec
    application.volatile

  13. #13
    Membre éclairé
    Femme Profil pro
    Technicienne en informatique
    Inscrit en
    Février 2004
    Messages
    257
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : Canada

    Informations professionnelles :
    Activité : Technicienne en informatique
    Secteur : Agroalimentaire - Agriculture

    Informations forums :
    Inscription : Février 2004
    Messages : 257
    Par défaut
    C'est sûr que c'est une bonne idée mais lorsqu'on copie une feuille, elle prend le même nom que la source avec (2) à côté. Si l'utilisateur veut renommer la feuille, le no ne suit toujours pas.

  14. #14
    Expert confirmé

    Profil pro
    Inscrit en
    Mai 2005
    Messages
    3 419
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2005
    Messages : 3 419
    Par défaut
    il faut encapsuler la fonction avec application volatile ou forcer le recalcul

  15. #15
    Membre éclairé
    Femme Profil pro
    Technicienne en informatique
    Inscrit en
    Février 2004
    Messages
    257
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : Canada

    Informations professionnelles :
    Activité : Technicienne en informatique
    Secteur : Agroalimentaire - Agriculture

    Informations forums :
    Inscription : Février 2004
    Messages : 257
    Par défaut
    Ok, mais comment je peux forcer le recalcul au moment du renommage (?) de l'onglet? Ça revient au problème de départ...

  16. #16
    Membre éclairé
    Femme Profil pro
    Technicienne en informatique
    Inscrit en
    Février 2004
    Messages
    257
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : Canada

    Informations professionnelles :
    Activité : Technicienne en informatique
    Secteur : Agroalimentaire - Agriculture

    Informations forums :
    Inscription : Février 2004
    Messages : 257
    Par défaut
    Je ne renomme pas ma feuille via du code mais bien en double-cliquant sur l'onglet.

  17. #17
    Inactif  
    Avatar de ouskel'n'or
    Profil pro
    Inscrit en
    Février 2005
    Messages
    12 464
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 12 464
    Par défaut
    Aucun événement ne correspond à un clic sur l'onglet. Ta solution du clic sur la feuille est bancale. Quant à la proposition de Random, faut un événement pour la réaliser...
    Bref, on tourne en rond... O

  18. #18
    Membre éclairé
    Femme Profil pro
    Technicienne en informatique
    Inscrit en
    Février 2004
    Messages
    257
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : Canada

    Informations professionnelles :
    Activité : Technicienne en informatique
    Secteur : Agroalimentaire - Agriculture

    Informations forums :
    Inscription : Février 2004
    Messages : 257
    Par défaut
    Ok bien merci beaucoup pour votre aide, je vais m'accommoder de ma solution même si elle n'est pas totalement parfaite.

    Merci beaucoup

  19. #19
    Membre éclairé
    Femme Profil pro
    Technicienne en informatique
    Inscrit en
    Février 2004
    Messages
    257
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : Canada

    Informations professionnelles :
    Activité : Technicienne en informatique
    Secteur : Agroalimentaire - Agriculture

    Informations forums :
    Inscription : Février 2004
    Messages : 257
    Par défaut
    J'aime bien l'idée par contre il ne faut pas que l'utilisateur oublie de cliquer pour changer le nom.

    C'est pourquoi je trouve que ma solution est peut-être moins dangereuse vu que je ne peux pas avoir deux projets avec le même numéro.

    Mais merci beaucoup pour ton aide.

  20. #20
    Membre Expert Avatar de Megaxel
    Profil pro
    Inscrit en
    Mai 2003
    Messages
    1 187
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2003
    Messages : 1 187
    Par défaut
    Salut steps5ive !
    Si tu considères que ce sujet est résolu, veux-tu bien cliquer sur le bouton , en bas à gauche.
    Merci !

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

Discussions similaires

  1. [VBA-E] Récupérer les noms des onglets
    Par a.dequidt dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 18/09/2007, 10h54
  2. [VBA-E] nom des onglets
    Par mulanzia2003 dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 21/03/2006, 10h56
  3. Réponses: 3
    Dernier message: 25/01/2006, 17h54
  4. [VBA][Excel] Nom de colonne a partir du numéro
    Par ddams dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 04/01/2006, 09h43
  5. Réponses: 10
    Dernier message: 13/06/2005, 16h02

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