1. #1
    Futur Membre du Club
    Homme Profil pro
    Webmaster
    Inscrit en
    août 2011
    Messages
    5
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Webmaster
    Secteur : High Tech - Multimédia et Internet

    Informations forums :
    Inscription : août 2011
    Messages : 5
    Points : 5
    Points
    5

    Par défaut Questionnaire avec writer

    Bonjour tous le monde
    version open office 4.1.3

    Le principe du questionnaire sur la connaissance d'un ordinateur sous writer
    cocher les cases représentant un périphérique de sortie

    j ai une page avec une image et une case à cocher avec l intitulé
    exemple l image d'un écran la case à cocher à côté et son intitulé Ecran
    pareils pour les autres images

    le principe:
    on coche la case correspondante à un périphérique de sortie
    Si les trois périphériques de sortie comme ecran, imprimante,enceintes sont cocher alors

    on arrive à la page réponse ou si la case disque dur est cochée alors on va vers la page mauvaise réponse

    Aprés avoir validé sa ou ses réponses

    Voici mon bout de code
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
     
    REM  *****  BASIC  *****
     
      Sub CheckBox()
      ' Déclaration des variables
     
      Dim CheckBox1 As Object
      Dim CheckBox2 As Object
      Dim CheckBox3 As Object
     
     
    If CheckBox1.State=1  Then MsgBox "Bonne réponse!"
    ElseIf Checkbox2.State=1 Then MsgBox "Bonne réponse!"
    ElseIf ChecBox3.State=1 Then MsgBox "Bonne réponse!"
    Else       MsgBox "Mauvaise réponse!"
    End If
     
    End Sub
    Déjà j'ai une erreur de syntaxe du Basic
    Else/Endif sans If.

    Comment procéder pour qu' après avoir cliquer sur le bouton
    on arrive soit vers la page réponse ou la page mauvaise réponse

    J'avais commencer une macro pour Impress open office (powerpoint chez office)
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
     
    Private Sub
     
    if(checkBox1 && checkbox2 && checBox3 .value =True Then 'SlideShowWindows(1).View.GotoSlide (4)'
    Else 'SlideShowWindows(1).View.GotoSlide (6)'
     
    End If 
    End Sub
    mais les cases à cocher ne fonctionne pas sur les diapositives

    et je ne sais pas comment faire ce même code pour appeler la page concernée


    Pourriez vous SVp m aider dans cette quête

    En pièce jointe le fichier concerné
    Merci à vous

    William_13
    Fichiers attachés Fichiers attachés

Discussions similaires

  1. Questionnaire avec réponses automatiques ?
    Par pat456 dans le forum Débuter
    Réponses: 5
    Dernier message: 07/09/2011, 20h40
  2. [XL-2007] Questionnaire avec optionbutton
    Par fanfan89 dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 22/02/2011, 17h26
  3. [PPT-2000] Questionnaire avec joker
    Par Fr33dom dans le forum VBA PowerPoint
    Réponses: 6
    Dernier message: 06/07/2009, 15h09
  4. Questionnaire avec questions chaînées
    Par jonathanC dans le forum Débuter
    Réponses: 13
    Dernier message: 05/06/2009, 17h49
  5. Questionnaire avec compte à rebours
    Par keyga dans le forum JavaScript
    Réponses: 6
    Dernier message: 06/04/2009, 13h49

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