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 :

pbm checkbox excel 2003


Sujet :

Macros et VBA Excel

  1. #1
    Membre averti
    Profil pro
    Inscrit en
    Janvier 2008
    Messages
    19
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2008
    Messages : 19
    Par défaut pbm checkbox excel 2003
    Bonjour tout le monde,

    j'ai un petit souci avec un formulaire dans excel.
    lors du chargement de mon formulaire, je dois verifier si mes checkboxs doivent etre cochée ou non en fonction des données dans une feuille.
    Ma condition :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    If (ActiveCell.Offset(0, 3).Value = lf_nom.Caption) And (ActiveCell.Offset(0, 2).Value = l_janvier.Caption) Then
           CheckBox1.Value = True
        End If

    La condition marche bien mais dès que je charge le formulaire et qu'une checkbox est cochée, il m'appelle la fonction Checkbox1_Click alors qu'il ne devrait pas.

    Si quelqu'un avait une petite idée svp ca serait gentil.
    Merci

  2. #2
    Inactif  

    Profil pro
    Inscrit en
    Juillet 2007
    Messages
    4 555
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2007
    Messages : 4 555
    Par défaut
    Bonsoir,

    Dire quue la valeur d'une checkbox = True revient à la cliquer, bien évidemment...

    J'igore le pourquoi de cette coche à l'avance (comprends pas l'intérêt) ...

    Mais si tu y tiens, voilà une façon parmi des dizaines d'autres (celle-ci est rigolote)...

    Exemple, donc :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    Private couic As Boolean
     
    Private Sub CheckBox1_Click()
      If couic Then
        MsgBox "oui"
      End If
      couic = True
    End Sub
     
    Private Sub UserForm_Initialize()
     CheckBox1.Value = true
    End Sub
    Il serait quand même plus simple de mettre la checkbox = True dans la fenêtre des propriétés (en dur, donc) et de la mettre à False dans ton Initialize si la condition n'est pas remplie ... (l'inverse, quoi ...)

Discussions similaires

  1. Réponses: 9
    Dernier message: 20/09/2007, 12h55
  2. Excel5 vers excel 2003
    Par MJMJ dans le forum Macros et VBA Excel
    Réponses: 47
    Dernier message: 24/03/2006, 19h57
  3. [VB.NET] problème pour piloter une appli. excel 2003
    Par Pynuch dans le forum Windows Forms
    Réponses: 13
    Dernier message: 16/11/2005, 13h02
  4. TExcelApplication - Excel 2003
    Par Leesox dans le forum Langage
    Réponses: 18
    Dernier message: 03/11/2005, 13h40
  5. [VB.NET] Problème avec un OptionButton dans Excel 2003
    Par alfprod dans le forum Windows Forms
    Réponses: 3
    Dernier message: 09/09/2004, 13h40

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