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][Excel]Rendre un checkbox ou textbox grisée


Sujet :

Macros et VBA Excel

  1. #1
    Membre habitué Avatar de Ania
    Profil pro
    Inscrit en
    Octobre 2005
    Messages
    155
    Détails du profil
    Informations personnelles :
    Âge : 39
    Localisation : France

    Informations forums :
    Inscription : Octobre 2005
    Messages : 155
    Points : 134
    Points
    134
    Par défaut [VBA][Excel]Rendre un checkbox ou textbox grisée
    Bonsoir à tous

    Comme le titre l'indique je cherche juste a rendre le changement d'état, ou d'écriture d'une checkbox ou d'un textbox respectueusement .

    Je souhaite que les objets restent visible mais "grisés" afin qu'on ne puisse changer la valeur

    Voila merci d'avance

  2. #2
    Membre averti
    Profil pro
    Inscrit en
    Septembre 2005
    Messages
    290
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Septembre 2005
    Messages : 290
    Points : 374
    Points
    374
    Par défaut
    Bonjour,
    Tu mets la propriété Locked à True, de cette façon l'utilisateur ne pourra pas modifier les données.Tu peux aussi changer la prpriété Enabled

    jpleroisse

  3. #3
    Membre régulier Avatar de calimero91
    Inscrit en
    Décembre 2005
    Messages
    183
    Détails du profil
    Informations personnelles :
    Âge : 43

    Informations forums :
    Inscription : Décembre 2005
    Messages : 183
    Points : 106
    Points
    106
    Par défaut
    tu veux qu'il reste visible est grisé tout le temps? ou seulement dans certain cas?

  4. #4
    Membre habitué Avatar de Ania
    Profil pro
    Inscrit en
    Octobre 2005
    Messages
    155
    Détails du profil
    Informations personnelles :
    Âge : 39
    Localisation : France

    Informations forums :
    Inscription : Octobre 2005
    Messages : 155
    Points : 134
    Points
    134
    Par défaut
    Tout d'abord bonjour à tous

    Secondo Excuse pour ce long silence impardonnable

    Pour répondre à ta question Calimero91, je souhaite qu'il soit visible tout le temps mais que selon certaines options choisies certaines cases à cocher soient grisées afin que cela soit plus clair pour l'utilisateur.

    D'ailleur je te remercie leroissejp pour cette première aide mais comme les utilisateurs du programme ne sont pas forcément des "fans de l'informatique"
    et il ne comprendrait peut etre pas pourquoi il ne peuvent cocher cette case.

  5. #5
    Inactif  
    Avatar de jmfmarques
    Profil pro
    Inscrit en
    Décembre 2005
    Messages
    3 784
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2005
    Messages : 3 784
    Points : 4 674
    Points
    4 674
    Par défaut
    La réponse de leroissejp (propriété enabled = false) est tout-à-fait valable en ce qui concerne un checkvox (impossible à modifier et automatiquement grisé)

    pour un textbox, il faut, en plus de enabled = false, modifier la proriété backcolor

    avant tout code :


    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    private toto as boolean, couleur as long
    dans l'événement form_activate :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Private Sub Form_Activate()
      couleur = textbox1.backcolor
    End Sub
    et dans l'événement click (ou autre considéré :
    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 coul as long
    if ..tes conditions.. then
      toto = false 
      coul = &H8000000F&
    else
      toto = true
      coul = couleur
    end if
    checkbox1.enabled = toto
    with textbox1  
      .enabled = toto
      .backcolor = coul
    end with

  6. #6
    Membre habitué Avatar de Ania
    Profil pro
    Inscrit en
    Octobre 2005
    Messages
    155
    Détails du profil
    Informations personnelles :
    Âge : 39
    Localisation : France

    Informations forums :
    Inscription : Octobre 2005
    Messages : 155
    Points : 134
    Points
    134
    Par défaut
    Je te remercie pour cette solution

    ca convient tout a fait a mon problème encore une fois merci.

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

Discussions similaires

  1. VBA Excel - Internet Explorer checkbox & script
    Par kocipia dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 10/09/2014, 14h40
  2. [VBA-Excel] Treeview et Checkboxes
    Par marsupilami34 dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 09/02/2007, 17h37
  3. Réponses: 4
    Dernier message: 27/11/2006, 23h20
  4. [VBA-Excel]Changer font dans une textbox
    Par Mugette dans le forum Macros et VBA Excel
    Réponses: 9
    Dernier message: 20/10/2006, 14h48
  5. [vba excel] Recherche valeur d'une textbox dans une feuille
    Par vanessaferraz dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 10/08/2006, 10h55

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