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] apparition de textbox


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé Avatar de alex_elder1_1
    Profil pro
    Étudiant
    Inscrit en
    Novembre 2006
    Messages
    82
    Détails du profil
    Informations personnelles :
    Âge : 38
    Localisation : France, Gironde (Aquitaine)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Novembre 2006
    Messages : 82
    Par défaut [VBA-E] apparition de textbox
    bjr a tous

    j'ai une userform et je souhaite que lorsque je choisi une commande speciale apparaisse deux petites textbox a la place d'une grosse tjrs sur la m userform. (en fait une commande de remplacement) Cela peut paraitre bizarre mais ca m'aiderait pas mal
    pourriez vous me donner la commande si elle existe

    merci d'avance

  2. #2
    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
    en "jouant" avec la propriété visible de tes text box..?

  3. #3
    Membre confirmé Avatar de alex_elder1_1
    Profil pro
    Étudiant
    Inscrit en
    Novembre 2006
    Messages
    82
    Détails du profil
    Informations personnelles :
    Âge : 38
    Localisation : France, Gironde (Aquitaine)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Novembre 2006
    Messages : 82
    Par défaut
    peux tu me montrer cette commande s'il te plait?
    et en fait je voudrais qu'elles apparaissent a la m place ou etait l'autre
    est ce possible?
    merci d'avance

  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
    ?

    ben tu dessine tes 3 textbox... txtMaGrosseTextBox et les deux petites txtMaPetiteTextBox1 et txtMaPetiteTextBox2 .. un bouton pour changer de mode cdbChangeMode
    puis ..

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
     
    Dim bMdePetite As Boolean
    Sub MajAffTxtBox()
      txtMaGrosseTextBox.Visible = Not bMdePetite
      txtMaPetiteTextBox1.Visible = bMdePetite
      txtMaPetiteTextBox2.Visible = bMdePetite
    End Sub
    Private Sub UserForm_Initialize()
        MajAffTxtBox
    End Sub
    Private Sub cdbChangeMode_Click()
     bMdePetite = Not bMdePetite
     MajAffTxtBox
    End Sub

  5. #5
    Membre confirmé Avatar de alex_elder1_1
    Profil pro
    Étudiant
    Inscrit en
    Novembre 2006
    Messages
    82
    Détails du profil
    Informations personnelles :
    Âge : 38
    Localisation : France, Gironde (Aquitaine)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Novembre 2006
    Messages : 82
    Par défaut
    merci a toi
    et si je veux appeler les deux petites boites comment dois je faire?
    parce que le code que j'ai appelle la grosse


    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    Private Sub cdbChangeMode()
     
    'GROSSE BOITE
     
     bMdePetite = Not bMdePetite
     MajAffTxtBox
     
    End Sub
    je l'ai mis en _after update

    j'ai tente
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
     Private Sub cdbChangeMode1()
     
    'PETITE BOITE
     
     txtMaPetiteTextBox1.Visible = bMdePetite
      txtMaPetiteTextBox2.Visible = bMdePetite
     MajAffTxtBox
     
    End Sub
    mais ca marche pas peux tu m'aider s'il te plait?
    merci

  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
    ben regarde comment fonctionne la fonction MajAffTxtBox ! .. pour afficher les 2 petites boites mais la variables bMdePetite à true avant d'appeler la fonction..

    sinon ceci n'est qu'un exemple... tu n'est pas forcé d'utiliser la variable bMdePetite... as tu compris le principe de fonctionnement..

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

Discussions similaires

  1. [VBA-E]Ordonner les textbox
    Par DonKnacki dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 19/04/2006, 14h23
  2. [VBA-A]Remplir une textbox avec des données de tables.
    Par cuicui08 dans le forum VBA Access
    Réponses: 1
    Dernier message: 24/03/2006, 10h28
  3. [VBA-E]ajouter un textbox sur un formulaire par code?
    Par DonKnacki dans le forum Macros et VBA Excel
    Réponses: 20
    Dernier message: 22/03/2006, 09h33
  4. [VBA-E]comparer contenu textbox et cellule
    Par DonKnacki dans le forum Macros et VBA Excel
    Réponses: 12
    Dernier message: 21/02/2006, 12h43
  5. [VBA-E] Retrouver un textbox créé dynamique
    Par wind_vinch dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 14/10/2005, 12h51

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