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 2003 Pb activation Multipage


Sujet :

Macros et VBA Excel

  1. #1
    Membre à l'essai
    Profil pro
    Inscrit en
    Janvier 2006
    Messages
    25
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2006
    Messages : 25
    Points : 17
    Points
    17
    Par défaut VBA Excel 2003 Pb activation Multipage
    Bonjour,
    J'ai un formulaire avec :
    - 4 checkbox
    - 1 mulipage avec 4 pages (Chaque page contient une msflexgrid)

    A l'ouverture du formulaire toutes mes pages sont .Enabled=False
    Un clic sur le checkbox1 met ma page1 .Enabled=True (le 2 la 2 ect..)

    Ca fonctionne, mais le pb que je recontre est le suivant :
    Le contenu de la page (càd. le msflexgrid) ne s'affiche pas tant que je ne clique pas sur l'onglet.

    Merci par avance et surtout bonne fête ce soir.
    Thierry

  2. #2
    Expert éminent sénior

    Homme Profil pro
    Inscrit en
    Août 2005
    Messages
    3 317
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Isère (Rhône Alpes)

    Informations professionnelles :
    Secteur : Industrie

    Informations forums :
    Inscription : Août 2005
    Messages : 3 317
    Points : 20 147
    Points
    20 147
    Par défaut
    bonjour

    Tu dois préciser la page à activer dans la procédure :
    MultiPage1.Value = NumPage
    ou
    MultiPage1.Value = MultiPage1.Pages("NomPage").Index


    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    If CheckBox1 Then
        With MultiPage1
            '0 représente la page 1
            .Pages(0).Enabled = True
            .Value = 0
            'ou
            '.Value = MultiPage1.Pages("page1").Index
        End With
    End If

    bonne journée
    michel

  3. #3
    Membre à l'essai
    Profil pro
    Inscrit en
    Janvier 2006
    Messages
    25
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2006
    Messages : 25
    Points : 17
    Points
    17
    Par défaut
    Merci Michel, ca fonctionne au poil.
    Bonne année à toi
    Thierry

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

Discussions similaires

  1. Réponses: 2
    Dernier message: 17/07/2007, 11h53
  2. vba excel 2003 - Insérer fichier txt
    Par stargates dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 11/07/2007, 20h52
  3. vba[Excel 2003]Problème userform
    Par stargates dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 07/07/2007, 15h15
  4. [VBA] Excel 2003 > 2000
    Par roseau dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 27/03/2007, 09h46
  5. Réponses: 2
    Dernier message: 28/06/2006, 16h00

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