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]appelé une feuille...?


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Profil pro
    Inscrit en
    Février 2006
    Messages
    50
    Détails du profil
    Informations personnelles :
    Âge : 42
    Localisation : France

    Informations forums :
    Inscription : Février 2006
    Messages : 50
    Par défaut [VBA-E]appelé une feuille...?
    bonjour je suis débutant dans la programmation de VB pour excell et du coup je suis bloqué par un problème tellement ridicule que personne n'a semblé utile d'en parler :
    voilà c'est tout simple je dois effectuer une macro sur une feuille à choisir par le biais d'une InputBox.
    Mon classeur contient x feuille appelée "catal x" (exemple "catal 11", "catal 13"...)
    comment je dois m'y prendre

  2. #2
    Modérateur
    Avatar de AlainTech
    Homme Profil pro
    Consultant informatique
    Inscrit en
    Mai 2005
    Messages
    4 235
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 71
    Localisation : Belgique

    Informations professionnelles :
    Activité : Consultant informatique
    Secteur : Finance

    Informations forums :
    Inscription : Mai 2005
    Messages : 4 235
    Par défaut
    Nettement plus "Pro" qu'une InputBox:

    Créer un UserForm avec
    1 ComboBox (Zone de liste modifiable) dont le nom est cboSheets et dont la propriété MatchRequired est à True
    1 CommandButton nommé cmdCancel
    1 CommandButton nommé cmdOk

    Placer ce code dans le UserForm:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    Option Explicit
     
    Private Sub UserForm_Initialize()
      Dim s As Worksheet
      For Each s In Worksheets
        cboSheets.AddItem (s.Name)
      Next s
      cboSheets.ListIndex = 0
    End Sub
     
    Private Sub cmdOk_Click()
      Me.Hide
      MsgBox cboSheets.Value
      Unload Me
    End Sub
     
    Private Sub cmdCancel_Click()
      Unload Me
    End Sub
    A la place de MsgBox cboSheets.Value, tu peux appeler ta macro en lui passant cboSheets.Value en paramètre.
    N'oubliez pas de cliquer sur quand vous avez obtenu ou trouvé vous-même la réponse à votre question.
    Si vous trouvez seul, pensez à poster votre solution. Elle peut servir à d'autres!
    Pensez aussi à voter pour les réponses qui vous ont aidés.
    ------------
    Je dois beaucoup de mes connaissances à mes erreurs!

Discussions similaires

  1. [VBA][Excel]Copier une feuille dans un nouveau classeur
    Par illight dans le forum Macros et VBA Excel
    Réponses: 6
    Dernier message: 02/10/2020, 12h51
  2. [VBA] exportation vers une feuille précise d'un fichier xls
    Par Christophe93250 dans le forum Access
    Réponses: 2
    Dernier message: 10/01/2006, 15h36
  3. [VBA] pointer sur une feuille bien précise via inputbox
    Par beegees dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 02/01/2006, 19h37
  4. Appeler une feuille excel grace à une Listbox
    Par eltess dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 15/12/2005, 23h37
  5. [VBA] Copie d'une feuille (avec graphique)
    Par ed_dexia dans le forum Macros et VBA Excel
    Réponses: 6
    Dernier message: 06/10/2005, 09h56

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