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

VBA Access Discussion :

Activer ou desactiver des champs


Sujet :

VBA Access

  1. #1
    Membre à l'essai
    Homme Profil pro
    Employé administratif
    Inscrit en
    Janvier 2005
    Messages
    37
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 54
    Localisation : France, Gironde (Aquitaine)

    Informations professionnelles :
    Activité : Employé administratif
    Secteur : Administration - Collectivité locale

    Informations forums :
    Inscription : Janvier 2005
    Messages : 37
    Points : 21
    Points
    21
    Par défaut Activer ou desactiver des champs
    Bonjour

    J'ai un formulaire (access2003) qui contient un nombre assez important de champs (90-100)
    En fonction du contenu d'une liste déroulante, certains de ces champs sont activés, d'autres non.
    J'ai donc ecrit des lignes
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    If...MonChamps1.enabled=true...else... false
    autant de fois qu'il y a de champs et pour autant d'option sur la liste déroulante.
    Donc c'est très lourd et en cas de rajout de champs supplémentaire en cas de besoin, ça oblige a des mises a jour fastidieuses du code.

    Y a t'il une astuce pour optimiser tous ça ?

    Merci de votre aide.

  2. #2
    Rédacteur/Modérateur

    Avatar de Jean-Philippe André
    Homme Profil pro
    Architecte Power Platform, ex-Développeur VBA/C#/VB.Net
    Inscrit en
    Juillet 2007
    Messages
    14 629
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 40
    Localisation : Canada

    Informations professionnelles :
    Activité : Architecte Power Platform, ex-Développeur VBA/C#/VB.Net
    Secteur : Finance

    Informations forums :
    Inscription : Juillet 2007
    Messages : 14 629
    Points : 34 334
    Points
    34 334
    Par défaut
    bonjour,
    si le nom des champs est bien régulier avec nom_valeur par exemple,
    tu peux faire une boucle du style
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    for i = 1 to 30
    if Me.Controls("Pioupiou_" & i).enabled then
    msgbox "plop"
    end if
    next i
    Cycle de vie d'un bon programme :
    1/ ça fonctionne 2/ ça s'optimise 3/ ça se refactorise

    Pas de question technique par MP, je ne réponds pas

    Mes ouvrages :
    Apprendre à programmer avec Access 2016, Access 2019 et 2021

    Apprendre à programmer avec VBA Excel
    Prise en main de Dynamics 365 Business Central

    Pensez à consulter la FAQ Excel et la FAQ Access

    Derniers tutos
    Excel et les paramètres régionaux
    Les fichiers Excel binaires : xlsb,

    Autres tutos

Discussions similaires

  1. Réponses: 6
    Dernier message: 20/08/2010, 18h28
  2. Réponses: 3
    Dernier message: 20/08/2010, 17h01
  3. Réponses: 5
    Dernier message: 07/05/2008, 16h14
  4. activation et desactivation des boutons
    Par monphp dans le forum VBA Access
    Réponses: 7
    Dernier message: 11/07/2007, 17h25
  5. [débutant]Desactiver des champs par rapport a un select
    Par Pymm dans le forum Général JavaScript
    Réponses: 2
    Dernier message: 16/02/2005, 16h24

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