Rechercher : dans
Par :

Bloquer un onglet dans Excel

Dernière réponse le 15 mai 2009 à 13:58:52 aurelie.jourdan, le 15 mai 2009 à 10:26:45 
 Signaler ce message aux modérateurs

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

1

pijaku, le 15 mai 2009 à 10:31:57

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 : http://cjoint.com/ )
Ce qui vaut la peine d'être fait vaut la peine d'être bien fait.

Répondre à pijaku

2

jullian jacques, le 15 mai 2009 à 10:52:28

La question m'intéresse. Vous pourrez faire apparaître la réponse sur le site ou me faire suivre.

Merci à tous

Répondre à jullian jacques

3

aurelie.jourdan, le 15 mai 2009 à 11:00:55

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é"

Répondre à aurelie.jourdan

4

aurelie.jourdan, le 15 mai 2009 à 11:00:56

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é"

Répondre à aurelie.jourdan

5

pijaku, le 15 mai 2009 à 11:09:59

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)? Ce qui vaut la peine d'être fait vaut la peine d'être bien fait.

Répondre à pijaku

6

aurelie.jourdan, le 15 mai 2009 à 11:17:15

C'est tout à fait ça, d'autant plus que ça génère des graphiques

Répondre à aurelie.jourdan

7

pijaku, le 15 mai 2009 à 11:18:16

Les cellules ou sont inscrit les résultats sont : A1:A71? Ce qui vaut la peine d'être fait vaut la peine d'être bien fait.

Répondre à pijaku

8

aurelie.jourdan, le 15 mai 2009 à 11:23:45

Pas uniquement car il y a des résultats jusqu'en ligne 350

Répondre à aurelie.jourdan

9

pijaku, le 15 mai 2009 à 11:25:44

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... Ce qui vaut la peine d'être fait vaut la peine d'être bien fait.

Répondre à pijaku

10

aurelie.jourdan, le 15 mai 2009 à 11:29:11

Pas de souci alors il y a des résulats de a1 à h255

Répondre à aurelie.jourdan

11

pijaku, le 15 mai 2009 à 11:31:55

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... Ce qui vaut la peine d'être fait vaut la peine d'être bien fait.

Répondre à pijaku

12

pijaku, le 15 mai 2009 à 11:33:39

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... Ce qui vaut la peine d'être fait vaut la peine d'être bien fait.

Répondre à pijaku

13

aurelie.jourdan, le 15 mai 2009 à 11:43:56

Voilà j'ai déposé comme demandé mon fichier sur le lien qui m'a été donné

Répondre à aurelie.jourdan

14

pijaku, le 15 mai 2009 à 11:46:46

Euh oui mais tu as oublié de coller le lien ici... Ce qui vaut la peine d'être fait vaut la peine d'être bien fait.

Répondre à pijaku

15

aurelie.jourdan, le 15 mai 2009 à 12:13:40
Répondre à aurelie.jourdan

16

pijaku, le 15 mai 2009 à 12:29:10

Euh le lien ne me donne que des hiéroglyphes... Ce qui vaut la peine d'être fait vaut la peine d'être bien fait.

Répondre à pijaku

17

pijaku, le 15 mai 2009 à 12:40:40

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?
Ce qui vaut la peine d'être fait vaut la peine d'être bien fait.

Répondre à pijaku

18

aurelie.jourdan, le 15 mai 2009 à 12:43:01

Non il y a également du texte et n'apparaissent pas sur la même colonne

Répondre à aurelie.jourdan

20

pijaku, le 15 mai 2009 à 13:30:31

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 Ce qui vaut la peine d'être fait vaut la peine d'être bien fait.

Répondre à pijaku

19

pijaku, le 15 mai 2009 à 12:50:37

Envoie moi en mail perso le fichier que tu as créé avec question1 question2 etc... Ce qui vaut la peine d'être fait vaut la peine d'être bien fait.

Répondre à pijaku

21

aurelie.jourdan, le 15 mai 2009 à 13:51:54

Je ne sais comment te remercier je vais essayer tout ça mais sincèrement merci pour le temps accordé à mon cas

Répondre à aurelie.jourdan

22

 pijaku, le 15 mai 2009 à 13:58:52

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... Ce qui vaut la peine d'être fait vaut la peine d'être bien fait.

Répondre à pijaku