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 :

Macro pour basculer d'une feuille à l'autre


Sujet :

Macros et VBA Excel

  1. #1
    Candidat au Club
    Homme Profil pro
    Technicien maintenance
    Inscrit en
    juillet 2021
    Messages
    9
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 61
    Localisation : France, Moselle (Lorraine)

    Informations professionnelles :
    Activité : Technicien maintenance

    Informations forums :
    Inscription : juillet 2021
    Messages : 9
    Points : 4
    Points
    4
    Par défaut Macro pour basculer d'une feuille à l'autre
    Bonjour à tous

    J'aimerai placé une macro dans une feuille d'un classeur Excel 365 afin de pouvoir basculer sur une autre feuille d'un autre classeur.

    C'est à dire j'ouvre un classeur avec un TDB et de ce TDB je peux ouvrir un autre classeur , or quand je suis sur ce dernier, j'aimerai bien avoir un bouton qui me renvoie sur le TDB du 1erclasseur.

    Auriez vous l'aimabilité de m'aider sur ce problème.

    Merci d'avance à tout le monde.

    Cordialement CarTune

  2. #2
    Membre expert
    Homme Profil pro
    retraité
    Inscrit en
    juin 2012
    Messages
    2 106
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Belgique

    Informations professionnelles :
    Activité : retraité
    Secteur : Associations - ONG

    Informations forums :
    Inscription : juin 2012
    Messages : 2 106
    Points : 3 528
    Points
    3 528
    Par défaut
    Bonjour,

    C'est le genre de macro que l'on peut facilement se préparer en utilisant le "Enregistrer une macro" d'Excel.

    La version minimale, qui suppose que les 2 classeurs sont déjà ouverts:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    Sub OuvrirClasseur()
        Windows("Classeur_1.xlsm").Activate         '--- passe sur le Classeur_1.xlsm --- à adapter
        ActiveWorkbook.Worksheets("Feuil1").Select  '--- sélectionne Feuil1 --- à adapter
    End Sub
    et si on veut l'améliorer un minimum, pour gérer les erreurs possibles:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    Sub OuvrirClasseur()
        On Error GoTo ErreurClasseur
        Windows("Classeur_1.xlsm").Activate         '--- passe sur le Classeur_1.xlsm
        On Error GoTo ErreurFeuil
        ActiveWorkbook.Worksheets("Feuil1").Select  '--- sélectionne Feuil1
        Exit Sub
    ErreurClasseur:
        MsgBox "Le fichier Classeur_1.xlsm  n'a pas encore été ouvert", , "Annulé"
        Exit Sub
    ErreurFeuil:
        MsgBox "Il n'y a pas de Feuil1 dans le Classeur_1.xlsm.", , "Anomalie"
    End Sub
    A adapter dans chacun des classeurs pour y indiquer les bons noms de fichier et de feuille.

    Cordialement.

  3. #3
    Candidat au Club
    Homme Profil pro
    Technicien maintenance
    Inscrit en
    juillet 2021
    Messages
    9
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 61
    Localisation : France, Moselle (Lorraine)

    Informations professionnelles :
    Activité : Technicien maintenance

    Informations forums :
    Inscription : juillet 2021
    Messages : 9
    Points : 4
    Points
    4
    Par défaut Macro pour basculer entre deux feuilles
    Bonsoir à vous EricDgn,

    Merci pour vos deux macros. J'ai essayé de les placer mais cela ne fonctionne pas.

    Je suis sûr que je fais une erreur quelque part !

    Je vous laisse le nom de mon classeur et les feuilles qui se trouvent dans ce classeur, pourriez vous me les placer en modèle SVP.

    Nom du classeur : Facturation mensuelle
    Les feuilles du classeur : TDB Factiuration
    Facture
    Archives
    Clients

    Je vous Remercie d'avance

    Cordialement CarTune

  4. #4
    Membre expert
    Homme Profil pro
    retraité
    Inscrit en
    juin 2012
    Messages
    2 106
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Belgique

    Informations professionnelles :
    Activité : retraité
    Secteur : Associations - ONG

    Informations forums :
    Inscription : juin 2012
    Messages : 2 106
    Points : 3 528
    Points
    3 528
    Par défaut
    Bonjour,

    De ce que je lis, il n'y a que 1 classeur contenant 4 feuilles.

    Ce que vous souhaitez est d'avoir sur chaque feuille Facture, Archives, Clients un bouton qui permet de revenir sur la feuille TDB Facturation? Si oui, c'est ceci:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Sub VersTDB()
        ThisWorkbook.Worksheets("TDB Facturation").Select  '--- sélectionne TDB Facturation
    End Sub
    Cordialement.

  5. #5
    Candidat au Club
    Homme Profil pro
    Technicien maintenance
    Inscrit en
    juillet 2021
    Messages
    9
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 61
    Localisation : France, Moselle (Lorraine)

    Informations professionnelles :
    Activité : Technicien maintenance

    Informations forums :
    Inscription : juillet 2021
    Messages : 9
    Points : 4
    Points
    4
    Par défaut Macro pour basculer entre deux feuilles
    Re EricDgn

    Merci pour votre retour. Mais cette macro je l'ai.

    j'avais mentionné dans mon premier post que je voudrai avoir un bouton sur le TDB de deux classeurs afin de pouvoir facilement basculer d'un classeur à l'autre.

    1)Mon premier classeur est nommé : Gestion collective prête 1 - Copie (2) (1)
    la première feuille de ce classeur est nommée : TDB

    2) Mon deuxième classeur est nommé : Facturation mensuelle
    La première feuille de ce classeur est nommée : TDB Facturation

    Donc je souhaiterai avoir un bouton sur : TDB et une autre sur TDB Facturation

    J'espère que cela n'est pas trop compliqué !

    Merci à vous EricDgn

    A+

  6. #6
    Membre expert
    Homme Profil pro
    retraité
    Inscrit en
    juin 2012
    Messages
    2 106
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Belgique

    Informations professionnelles :
    Activité : retraité
    Secteur : Associations - ONG

    Informations forums :
    Inscription : juin 2012
    Messages : 2 106
    Points : 3 528
    Points
    3 528
    Par défaut
    Dans ce cas,

    Dans le dossier Gestion collective prête 1 - Copie (2) (1)
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    Sub OuvrirClasseur()
        Windows("Facturation mensuelle").Activate
        ActiveWorkbook.Worksheets("TDB Facturation").Select
    End Sub
    et dans le dossier Facturation mensuelle
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    Sub OuvrirClasseur()
        Windows("Gestion collective prête 1 - Copie (2) (1)").Activate
        ActiveWorkbook.Worksheets("TDB").Select
    End Sub
    Il est supposé que les 2 dossiers sont déjà ouverts.
    Cordialement.

  7. #7
    Candidat au Club
    Homme Profil pro
    Technicien maintenance
    Inscrit en
    juillet 2021
    Messages
    9
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 61
    Localisation : France, Moselle (Lorraine)

    Informations professionnelles :
    Activité : Technicien maintenance

    Informations forums :
    Inscription : juillet 2021
    Messages : 9
    Points : 4
    Points
    4
    Par défaut Macro pour basculer entre deux feuilles
    Merci beaucoup EricDgn,

    Tès bonne explication et bien à comprendre.

    Je vous souhaite une Bonne soirée et à bientôt peut-être.

    Cordialement CarTune

Discussions similaires

  1. [XL-2013] XL 2016 - Macro pour cacher/afficher une feuille
    Par Citrax dans le forum Excel
    Réponses: 2
    Dernier message: 03/12/2015, 18h01
  2. [XL-MAC 2011] Macro pour transfert d'une feuille dans un nbr de feuille inconnu selon un critère
    Par Annyie dans le forum Macros et VBA Excel
    Réponses: 15
    Dernier message: 19/09/2015, 20h11
  3. [XL-2007] Macro pour copier d'une feuille vers une autre
    Par amapacha dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 12/09/2014, 12h37
  4. [XL-2010] Utilisation d'une valeur d'une cellule pour basculer vers une feuille
    Par juju05 dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 23/08/2012, 15h23
  5. Raccourci pour basculer d'une fenetre à l'autre
    Par zeugzeug dans le forum Word
    Réponses: 5
    Dernier message: 17/06/2009, 04h32

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