1. #1
    Candidat au Club
    Femme Profil pro
    Enseignant
    Inscrit en
    août 2017
    Messages
    5
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Âge : 29
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Enseignant

    Informations forums :
    Inscription : août 2017
    Messages : 5
    Points : 3
    Points
    3

    Par défaut Vérifier Réponses d'un questionnaire

    Bonjour, je débute totalement en vba, mais par le passer j'ai fait un peu de programmation donc j'essaie de comprendre son fonctionnement.
    Je vous expose donc mon problème, j'ai créer une page où j'ai plusieurs textbox (6 en tout). J'aimerais qu'une fois toute les textbox complété avec des réponses correct powerpoint passe sur le slide suivant.

    J'ai bien essayé le tuto proposé sur la page tuto, mais je n'arrive pas a obtenir ce que je souhaite.

    Je joint une capture de la page et textbox que je souhaiterais créer.
    Images attachées Images attachées  

  2. #2
    Rédacteur/Modérateur

    Avatar de Jean-Philippe André
    Homme Profil pro
    Developpeur VBA migrant tranquillement vers C# et VB.Net =]
    Inscrit en
    juillet 2007
    Messages
    12 136
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 33
    Localisation : Royaume-Uni

    Informations professionnelles :
    Activité : Developpeur VBA migrant tranquillement vers C# et VB.Net =]
    Secteur : Finance

    Informations forums :
    Inscription : juillet 2007
    Messages : 12 136
    Points : 26 835
    Points
    26 835

    Par défaut

    Bonjour,

    bienvenue sur DVP

    C'est une bonne idee pour commencer ce type de comportement

    Quel est ton etat de code actuel ? Tu as essaye certaines choses sans y arriver ? Lesquelles ?

    Arrives-tu a lire le contenu des txtbox ? Arrives-tu a passer au slide suivant ?

    Sur quelle etape bloques tu ?
    Pas de question technique par MP, je ne réponds pas

    Apprendre à programmer avec Access 2016

    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

  3. #3
    Candidat au Club
    Femme Profil pro
    Enseignant
    Inscrit en
    août 2017
    Messages
    5
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Âge : 29
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Enseignant

    Informations forums :
    Inscription : août 2017
    Messages : 5
    Points : 3
    Points
    3

    Par défaut

    Bonjour et merci pour la réponse,

    Alors pour le moment mon code va pas très loin il se résume à ça :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    Private Sub TextBox1_Change()
    If TextBox1.Text = "1" Then
    SlideShowWindows(1).View.GotoSlide (2)
    End If
    End Sub

    Et cela fonctionne, cependant ça change de slide direct après que la réponse dans le textbox1 soit bonne, je sais pas comment ajouter un "et" et ajouter les conditions sur les autres textbox avant de faire le changement de slide. J'ai testé la virgule, le point virgule, juste l'espace et ça me met une erreur, n'ayant pas trouvé de fichier avec les commande type et ne sachant pas vraiment quoi chercher dans l'aide je me tourne finalement vers vous.

  4. #4
    Rédacteur/Modérateur

    Avatar de Jean-Philippe André
    Homme Profil pro
    Developpeur VBA migrant tranquillement vers C# et VB.Net =]
    Inscrit en
    juillet 2007
    Messages
    12 136
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 33
    Localisation : Royaume-Uni

    Informations professionnelles :
    Activité : Developpeur VBA migrant tranquillement vers C# et VB.Net =]
    Secteur : Finance

    Informations forums :
    Inscription : juillet 2007
    Messages : 12 136
    Points : 26 835
    Points
    26 835

    Par défaut

    OK,

    alors pour faire un test sur plusieurs textbox tu peux passer par
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    If TextBox1.Text = "1" And TextBox2.Text = "2" Then
    Je te conseille de creer un bouton pour valider la reponse, et au click sur le bouton tu declenches le code de test et de passage a la slide suivante.
    Pas de question technique par MP, je ne réponds pas

    Apprendre à programmer avec Access 2016

    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

  5. #5
    Candidat au Club
    Femme Profil pro
    Enseignant
    Inscrit en
    août 2017
    Messages
    5
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Âge : 29
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Enseignant

    Informations forums :
    Inscription : août 2017
    Messages : 5
    Points : 3
    Points
    3

    Par défaut

    Merci beaucoup cela fonctionne bien

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    Private Sub Vérifier_Click()
    If TextBox1.Text = "1" And TextBox2.Text = "0" And TextBox3.Text = "1" And TextBox4.Text = "1" And TextBox5.Text = "1" And TextBox6.Text = "1" Then
    SlideShowWindows(1).View.GotoSlide (2)
    End If
    End Sub
    J'ai fais ça et ça marche comme je le souhaite. Merci beaucoup pour l'aide

    J'aurais une ultime question, peut-on éditer l'aspect du bouton crée?

  6. #6
    Rédacteur/Modérateur

    Avatar de Jean-Philippe André
    Homme Profil pro
    Developpeur VBA migrant tranquillement vers C# et VB.Net =]
    Inscrit en
    juillet 2007
    Messages
    12 136
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 33
    Localisation : Royaume-Uni

    Informations professionnelles :
    Activité : Developpeur VBA migrant tranquillement vers C# et VB.Net =]
    Secteur : Finance

    Informations forums :
    Inscription : juillet 2007
    Messages : 12 136
    Points : 26 835
    Points
    26 835

    Par défaut

    En faisant un clic droit sur le bouton > Proprietes

    Tu as la possibilite de modifier le texte, la couleur, la police, etc.
    Pas de question technique par MP, je ne réponds pas

    Apprendre à programmer avec Access 2016

    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

  7. #7
    Candidat au Club
    Femme Profil pro
    Enseignant
    Inscrit en
    août 2017
    Messages
    5
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Âge : 29
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Enseignant

    Informations forums :
    Inscription : août 2017
    Messages : 5
    Points : 3
    Points
    3

    Par défaut

    Merci,

    J'ai en faite une autre question. J'ai enregistré mon fichier en .ppsm pour pouvoir le donner à mes élèves afin qu'ils ne puissent pas modifier le contenu du powerpoint. Cependant sur l'ordinateur avec lequel j'ai crée le powerpoint tout fonctionne bien, par contre sur un autre poste il est impossible de compléter les cases ou encore de vérifier les réponses. Auriez vous une idée pour régler le problème?

    2e chose peut-on effacer les réponses entrées après avoir appuyé sur le bouton?

  8. #8
    Rédacteur/Modérateur

    Avatar de Jean-Philippe André
    Homme Profil pro
    Developpeur VBA migrant tranquillement vers C# et VB.Net =]
    Inscrit en
    juillet 2007
    Messages
    12 136
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 33
    Localisation : Royaume-Uni

    Informations professionnelles :
    Activité : Developpeur VBA migrant tranquillement vers C# et VB.Net =]
    Secteur : Finance

    Informations forums :
    Inscription : juillet 2007
    Messages : 12 136
    Points : 26 835
    Points
    26 835

    Par défaut

    Pour effacer les donnees, il faut passer par exemple par
    Pour ta premiere question, de quelle version disposes les personnes ?
    Pas de question technique par MP, je ne réponds pas

    Apprendre à programmer avec Access 2016

    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

  9. #9
    Candidat au Club
    Femme Profil pro
    Enseignant
    Inscrit en
    août 2017
    Messages
    5
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Âge : 29
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Enseignant

    Informations forums :
    Inscription : août 2017
    Messages : 5
    Points : 3
    Points
    3

    Par défaut

    Alors j'ai testé sous seven en ouvrant avec pp 2010 la version .ppms qui ne fonctionne pas par contre la version .potm fonctionne.

    Pour le code:
    Je doit l'insérer après le bouton avec un TextBox_change() ?

  10. #10
    Rédacteur/Modérateur

    Avatar de Jean-Philippe André
    Homme Profil pro
    Developpeur VBA migrant tranquillement vers C# et VB.Net =]
    Inscrit en
    juillet 2007
    Messages
    12 136
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 33
    Localisation : Royaume-Uni

    Informations professionnelles :
    Activité : Developpeur VBA migrant tranquillement vers C# et VB.Net =]
    Secteur : Finance

    Informations forums :
    Inscription : juillet 2007
    Messages : 12 136
    Points : 26 835
    Points
    26 835

    Par défaut

    Tu dois l'inserer lorsque tu passes a la slide suivante par exemple =]
    Pas de question technique par MP, je ne réponds pas

    Apprendre à programmer avec Access 2016

    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

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

Discussions similaires

  1. Figer les réponses d'un questionnaire
    Par Castor BZH dans le forum Débuter
    Réponses: 2
    Dernier message: 05/06/2011, 11h55
  2. Réponses: 1
    Dernier message: 28/10/2010, 12h09
  3. Réponses: 3
    Dernier message: 18/07/2008, 00h43
  4. Questionnaire à réponses ouvertes avec PowerPoint
    Par kalywake dans le forum VBA PowerPoint
    Réponses: 1
    Dernier message: 19/08/2007, 09h36
  5. Réponses: 1
    Dernier message: 26/11/2006, 00h46

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