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 :

remplacer nom formulaire par une 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 confirmé
    Profil pro
    Inscrit en
    Décembre 2010
    Messages
    57
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2010
    Messages : 57
    Par défaut remplacer nom formulaire par une variable
    Bonjour

    Je cherche à ouvrir un formulaire avec une variable.
    J'ai ceci
    et je voudrais remplacer "Mon Formulaire" par ma variable"Formulaire1"j'ai testé par msgbox je récupère bien cette variable juste avant "Mon formulaire.show"
    J'ai essayé
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    VBA.UserForms.add(Formulaire1).show
    mais cela ne fonctionne pas
    merci

  2. #2
    Invité
    Invité(e)
    Par défaut
    Bonjour

    A mon avis un problème de déclaration de variable et d'affectation du nom dans celle-ci.

    Un exemple : http://silkyroad.developpez.com/VBA/UserForm/#LIII-A-3

    Philippe

  3. #3
    Membre confirmé
    Profil pro
    Inscrit en
    Décembre 2010
    Messages
    57
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2010
    Messages : 57
    Par défaut
    Bonjour Philippe

    Merci de ta réponse ,avec les idées un peu plus claires ce matin ,effectivement cela fonctionne bien .
    Mais voila le problème j'ai
    pour récupérer le nom du formulaire qui est Compte, le formulaire est caché par
    pour l'afficher si je fais
    il reste chargé ,mais si je fais
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    VBA.UserForms.add(Formulaire1).show
    il s'affiche mais il est vide
    merci

  4. #4
    Expert éminent


    Profil pro
    Inscrit en
    Juin 2003
    Messages
    14 008
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2003
    Messages : 14 008
    Par défaut
    avec VBA.UserForms.add.. tu charge et tu ouvre un nouveau formulaire... et donc les saisies dans le précédent ne sont pas reportées...


    2 questions :
    - pourquoi vouloir trouver le nom de ton formulaire dans une variable ?
    - combien de formulaires identique désire tu ouvrir ?

  5. #5
    Membre confirmé
    Profil pro
    Inscrit en
    Décembre 2010
    Messages
    57
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2010
    Messages : 57
    Par défaut
    Bonjour

    En fait il n'y à qu'un seul formulaire d'ouvert à la fois mais se n'est jamais le même.
    Je m'explique dans chaque formulaire il y a bouton avec une macro qui active la même feuille ,je précise que cette feuille ce trouve sur une clef USB, et qui cache le formulaire.Sur cette feuille il y a un bouton avec une macro qui devrait ouvrir le formulaire précédemment caché.
    Si je précise le nom du formulaire caché comme cela il s'ouvre chargé
    si je l'ouvre avec sa variable il s'ouvre mais vide
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    VBA.UserForms.add(Formulaire1).show

  6. #6
    Expert éminent


    Profil pro
    Inscrit en
    Juin 2003
    Messages
    14 008
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2003
    Messages : 14 008
    Par défaut
    si tu n'as qu'un seul formulaire de chargé tu n'as pas besoin de son nom :


    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    If VBA.UserForms.Count > 0 Then
      VBA.UserForms(0).Show
    End If

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

Discussions similaires

  1. [AC-2013] remplacer le nom d'un formulaire par une variable dans un Public Sub
    Par GuyDuLac dans le forum VBA Access
    Réponses: 2
    Dernier message: 24/10/2014, 17h23
  2. Remplacer un champ par une variable sur une select from deleted
    Par Estomac dans le forum Développement
    Réponses: 4
    Dernier message: 14/03/2014, 15h16
  3. Réponses: 2
    Dernier message: 17/09/2008, 16h17
  4. Réponses: 4
    Dernier message: 10/03/2007, 02h29
  5. Réponses: 6
    Dernier message: 03/11/2006, 09h59

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