Bloquer un onglet dans Excel

aurelie.jourdan -  
pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   -
Bonjour,

Je suis un peu perdue car je suis entrain de réaliser mon travail de fin d'études (Bachelor) sur Excel et je suis bloquée dans un des élément de ce dernier.

Je m'explique...

Je souhaiterais pouvoir bloquer un onglet tant que la personne n'a pas répondu à l'onglet précédent. En d'autres termes, sur le premier onglet se trouve un questionnaire lui-même composé de 71 questions tandis que sur le deuxième onglet se génère automatiquement les résultats du questionnaire. Je voudrais faire en sorte, par le biais d'une astuce ou d'une formule, que tant que la personne n'a pas répondu au 71 questions il ne puisse pas aller ces résultats.

Est-ce que cela est possible???

Merci mille fois à tous pour votre précieuse aide
Configuration: Windows XP Internet Explorer 7.0

19 réponses

  1. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
     
    Pour éviter ce souci de confidentialité peut être pourrais tu enregistrer ton fichier sous un autre nom et remplacer tes questions par : "question1", "question2", "question3" etc... et nous joindre ce nouveau fichier.....
    Nous on s'en fiche des questions et des réponses...
    1
  2. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
     
    Bonjour,
    Le truc c'est de le masquer et de l'afficher lorsque tout est complet.
    Ta feuille résultat se présente comment? Une bonne réponse = 1 une mauvaise 0? Peux tu nous envoyer ici ton fichier (en utilisant : https://www.cjoint.com/ )
    0
  3. jullian jacques
     
    La question m'intéresse. Vous pourrez faire apparaître la réponse sur le site ou me faire suivre.

    Merci à tous
    0
  4. aurelie.jourdan
     
    Merci mille fois et crois moi j'aimerais bien joindre mon fichier mais malheureusement je suis sous close de confidentialité avec une entreprise.

    En fait le questionnaire se présente sous 5 formes de réponses possibles 1 à 4 (4 étant le meilleur) et une case "non concerné"
    0
  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. aurelie.jourdan
     
    Merci mille fois et crois moi j'aimerais bien joindre mon fichier mais malheureusement je suis sous close de confidentialité avec une entreprise.

    En fait le questionnaire se présente sous 5 formes de réponses possibles 1 à 4 (4 étant le meilleur) et une case "non concerné"
    0
  7. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
     
    Je suppose que le fait de répondre sur la feuil1 incrémente automatiquement une cellule de la feuille "résultat". Quelles sont les références de ces cellules (résultats)? Est ce qu'elles se suivent (genre A1:A71)?
    0
  8. aurelie.jourdan
     
    c'est tout à fait ça, d'autant plus que ça génère des graphiques
    0
  9. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
     
    Les cellules ou sont inscrit les résultats sont : A1:A71?
    0
  10. aurelie.jourdan
     
    pas uniquement car il y a des résultats jusqu'en ligne 350
    0
  11. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
     
    Peux tu, afin que je te transmette la réponse exacte adaptée à ton cas, me donner les numéros de ces cellules résultats (toutes si possible...) je sais ça va te faire du boulot mais...
    0
  12. aurelie.jourdan
     
    pas de souci alors il y a des résulats de a1 à h255
    0
    1. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
       
      non je ne crois pas que nous nous sommes compris. Je voudrais les cellules exactes ou sont inscrit les résultats.
      Ex :
      question 1 : résultat en Feuil2 A2
      question 2 : résultat en Feuil2 B12
      Je voudrais donc dans l'exemple A2, B12 etc...
      0
  13. aurelie.jourdan
     
    voilà j'ai déposé comme demandé mon fichier sur le lien qui m'a été donné
    0
    1. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
       
      Euh oui mais tu as oublié de coller le lien ici...
      0
  14. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
     
    Euh le lien ne me donne que des hiéroglyphes...
    0
  15. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
     
    tes résultats sont situés dans la plage de A1 à H255 mais sont ils tous des chiffres (même si l'on n'a pas répondu à la question)? sont ils tous placés dans la même colonne? Si oui laquelle?
    0
  16. aurelie.jourdan
     
    non il y a également du texte et n'apparaissent pas sur la même colonne
    0
    1. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
       
      Il faudrait donc en Feuille résultats, colonne I (ou J ou AB ou IV...) mettre une formule du style
      si la réponse à la question1 apparaît en A1 :
      en I1 : =SI(A1<>"";1;0)
      si la réponse à la question 2 apparaît en C5 :
      en I5 : =SI(C5<>"";1;0)
      si la réponse à la question 3 apparaît en D12 :
      en I12 : =SI(D12<>"";1;0)
      etc.....
      si la réponse à la question 71 apparaît en H255 :
      en I255 : =SI(H255<>"";1;0)
      Et en I256 : =PRODUIT(I1:I255)
      ensuite revenir sur l'onglet questions, faire : Format/Feuille/Masquer masquer la feuille résultats
      revenir sur la feuille question, faire un clic droit sur l'onglet et choisir "Visualiser le code"
      une fenêtre s'ouvre avec :
      Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)

      End Sub
      entre ces 2 lignes placer ce code (en remplaçant résultats par le nom de l'onglet de ta feuille ou apparraissent les résultats) :
      If Sheets("résultats").Range("I256") = "1" Then
      Sheets("résultats").Visible = True
      Sheets("résultats").Select
      End If

      Donc tu obtiens :
      Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
      If Sheets("résultats").Range("I256") = "1" Then
      Sheets("résultats").Visible = True
      Sheets("résultats").Select
      End If
      tu fermes cette fenêtre et c'est good!!
      End Sub
      0
  17. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
     
    envoie moi en mail perso le fichier que tu as créé avec question1 question2 etc...
    0
  18. aurelie.jourdan
     
    Je ne sais comment te remercier je vais essayer tout ça mais sincèrement merci pour le temps accordé à mon cas
    0
  19. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
     
    De rien. Tu sais je pourrais te le "bricoler" vite fait bien fait si j'avais toutes les infos ou même la fausse copie de ton fichier...
    0