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

IHM Discussion :

Affecter une valeur à une zone de texte


Sujet :

IHM

  1. #1
    Membre habitué
    Avatar de Peanut
    Profil pro
    Inscrit en
    Décembre 2003
    Messages
    410
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2003
    Messages : 410
    Points : 147
    Points
    147
    Par défaut Affecter une valeur à une zone de texte
    J'ai une zone de texte à laquelle je veux affecter la valeur se trouvant dans une zone de liste modifiable :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Forms("IndexingForm")("ztUse").??? =  Forms("IndexingForm")("zlmUse2").Value
    Quelle est la syntaxe svp ?

    J'imagine qu'il va vous falloir environ 3 secondes pour répondre à cette question, mais je ne sais vraiment pas où trouver les infos de bases sur le VBA.

  2. #2
    Membre du Club Avatar de Echizen1
    Profil pro
    Inscrit en
    Avril 2006
    Messages
    80
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Avril 2006
    Messages : 80
    Points : 44
    Points
    44
    Par défaut
    Coucou,
    Sauf erreur de ma part, la syntaxe est :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Texte1.Value = Modifiable1.Value
    "1" est à remplacer par les bons numéros

  3. #3
    Expert éminent sénior

    Avatar de Tofalu
    Homme Profil pro
    Technicien maintenance
    Inscrit en
    Octobre 2004
    Messages
    9 501
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 40
    Localisation : France, Ain (Rhône Alpes)

    Informations professionnelles :
    Activité : Technicien maintenance
    Secteur : Associations - ONG

    Informations forums :
    Inscription : Octobre 2004
    Messages : 9 501
    Points : 32 311
    Points
    32 311
    Par défaut
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Forms("IndexingForm")("ztUse").Value =  Forms("IndexingForm")("zlmUse2").Value
    Mais bon, à la limite pas besoin de VBA.

    Il suffit de mettre dans la source de ztUse :


  4. #4
    Membre habitué
    Avatar de Peanut
    Profil pro
    Inscrit en
    Décembre 2003
    Messages
    410
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2003
    Messages : 410
    Points : 147
    Points
    147
    Par défaut
    Je lance le code dans une procédure VBA, donc il me faut du code VBA :
    avec
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Forms("IndexingForm")("ztUse").Value =  Forms("IndexingForm")("zlmUse2").Value
    ça me dit "Impossible d'attribuer une valeur à cet objet"

    Pourtant, juste avant j'ai fait
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    Forms("IndexingForm")("ztUse").Enabled = True
    Forms("IndexingForm")("ztUse").Locked = False
    (ztUse c'est la zone de texte)

  5. #5
    Membre habitué
    Avatar de Peanut
    Profil pro
    Inscrit en
    Décembre 2003
    Messages
    410
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2003
    Messages : 410
    Points : 147
    Points
    147
    Par défaut
    Même avec une chaîne à la con c'est pareil :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
                Forms("IndexingForm")("ztUse").Enabled = True
                Forms("IndexingForm")("ztUse").Locked = False
                Forms("IndexingForm")("ztProcess").Value = "blabla"
    (je pense que le Enabled=True est inutile pour ça en plus)

    Voilà ce que ça me dit à l'exécution en détail :
    Impossible d'attribuer une valeur à cet objet
    * L'objet est peut-être un contrôle sur un formulaire en lecture seule.
    * Il peut être un formulaire en mode Création.
    * Il est possible aussi que al valeur soit trop grande pour ce champ
    Mes réponses :
    1) Je ne pense pas, j'ai regardé les pptés du formulaire : Entrée données = Oui
    2) Non
    3) C'est une bête zone de texte

    What is the problem ?

  6. #6
    Membre habitué
    Avatar de Peanut
    Profil pro
    Inscrit en
    Décembre 2003
    Messages
    410
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2003
    Messages : 410
    Points : 147
    Points
    147
    Par défaut
    up !

    Après avoir fait un paquet de test, j'ai trouvé ce qui ne lui plaisait pas :
    j'ai renseigné une "source de contrôle" pour initialiser ma zone de texte ztUse . Si je ne la renseigne pas, le Forms("IndexingForm")("ztUse").Value = xxx fonctionne.

    Mais ça m'embête de ne pas initialiser les champs avec une valeur.
    Y'a pas moyen de faire un UnSet Control ou Control = Null ou un truc du genre, juste avant de le mettre à jour ?



    PS : et FYI le Enabled et le Locked ne sont pas nécessaire

  7. #7
    Membre habitué
    Avatar de Peanut
    Profil pro
    Inscrit en
    Décembre 2003
    Messages
    410
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2003
    Messages : 410
    Points : 147
    Points
    147
    Par défaut
    Bon, j'ai contourné le pb en regroupant toutes les fonctions de remplissage dans l'évènement d'ouverture du formulaire plutôt que dans la source de chaque contrôle.
    (j'ai l'impression de passer mon temps à trouver des détournements avec Access...)

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

Discussions similaires

  1. [XL-2007] Affecter la valeur d’une zone de texte dans plusieurs cellules à la fois
    Par iliesss dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 06/07/2011, 23h51
  2. Réponses: 5
    Dernier message: 23/01/2010, 20h57
  3. Réponses: 8
    Dernier message: 22/09/2007, 17h32
  4. Concaténer une valeur de zone de texte
    Par kaspar dans le forum Flash
    Réponses: 4
    Dernier message: 18/10/2006, 02h13
  5. [VBA-E]Affecter une valeur à une zone de texte
    Par Elstak dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 15/05/2006, 09h26

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