Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel compte à rebours

compte à rebours

15 réponses
Avatar
Faya49
bonjour,
j'aimerais insérer un compte à rebours (de 30 minutes par exemple) dans un
classeur excel ou j'ai créer un test QCM. Je voudrais que ce compte à rebours
se déclenche quand le candidat commence le test et qu'il reste affiché. Est
ce que quelqu'un peut m'aider car en prog je ne suis pas très fort

Merci et @+
Signaler un problème avec ce contenu

5 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
1 2
Avatar
Faya49
Toujours super extra ton chrono, et ce qui m'épate le plus c qu excel se
ferme a la fin. A ce propos je voudrais pouvoir faire la même chose mais en
cliquant sur un bouton, peut tu medire comment faire ?

merci et @+
Avatar
michdenis
Bonjour Faya49,

Disons que dans la procédure que tu as récupérée, tu as
droit à une fermeture d'excel très spécial...
un peu longuet à expliquer !

La façon de faire normalement utilisée :
Il faut d'abord fermer tous les classeurs qui sont ouverts dans cette instance.
Selon que tu veuilles ou non enregistrer tes fichiers ouverts, il y a quelques
variantes ...

Ceci ferme tous les classeurs ouverts et enregistre
chacun d'eux. Si tu remplace "true" par "false" dans
la procédure, tout va se fermer sans enregistrement au préalable
'-------------------
Sub FermerExcel()
For each Wk in Workbooks
Wk.Close True
next
Applicatation.Quit
End sub
'-------------------

Si tu veux qu'excel te demande pour chacun des fichiers ouverts si tu
désires sauvegarder ton fichier,

Application.Quit


Salutations!


"Faya49" a écrit dans le message de news:
Toujours super extra ton chrono, et ce qui m'épate le plus c qu excel se
ferme a la fin. A ce propos je voudrais pouvoir faire la même chose mais en
cliquant sur un bouton, peut tu medire comment faire ?

merci et @+
Avatar
docm
Bonjour michdenis.
Pour que tous les classeurs soient fermés correctement, il ne faut pas
fermer le classeur ThisWorkbook avant d'avoir fermé tous les autres
classeurs sinon la procédure va être interrompue prématurément.

docm

"michdenis" a écrit dans le message news:
uDytKmc#
Bonjour Faya49,

Disons que dans la procédure que tu as récupérée, tu as
droit à une fermeture d'excel très spécial...
un peu longuet à expliquer !

La façon de faire normalement utilisée :
Il faut d'abord fermer tous les classeurs qui sont ouverts dans cette
instance.

Selon que tu veuilles ou non enregistrer tes fichiers ouverts, il y a
quelques

variantes ...

Ceci ferme tous les classeurs ouverts et enregistre
chacun d'eux. Si tu remplace "true" par "false" dans
la procédure, tout va se fermer sans enregistrement au préalable
'-------------------
Sub FermerExcel()
For each Wk in Workbooks
Wk.Close True
next
Applicatation.Quit
End sub
'-------------------

Si tu veux qu'excel te demande pour chacun des fichiers ouverts si tu
désires sauvegarder ton fichier,

Application.Quit


Salutations!


"Faya49" a écrit dans le message de
news:

Toujours super extra ton chrono, et ce qui m'épate le plus c qu excel se
ferme a la fin. A ce propos je voudrais pouvoir faire la même chose mais
en

cliquant sur un bouton, peut tu medire comment faire ?

merci et @+




Avatar
michdenis
Bonjour Docm,

Je ne sais pas où tu veux en venir avec ta remarque....

Mais si la ligne de code "Application.Quit" s'exécute, peu importe le nombre de classeurs ouverts dans cette instance d'excel et peu
importe dans quel classeur est écrite cette ligne de code, Excel demandera à l'usager s'il désire sauvegarder chacun des fichiers
ouverts, ou, tout au moins les fichiers qui ont été modifiés depuis leur ouverture.

À l'évidence même, si tu places devant cette ligne de commande "Application.Quit, cette autre ligne de code "ThisWorkbook.Close
False" ...le problème ne se situe pas au niveau d'excel mais à 12 pouces de l'écran.


Salutations!



"docm" a écrit dans le message de news: OI%23afKo%
Bonjour michdenis.
Pour que tous les classeurs soient fermés correctement, il ne faut pas
fermer le classeur ThisWorkbook avant d'avoir fermé tous les autres
classeurs sinon la procédure va être interrompue prématurément.

docm

"michdenis" a écrit dans le message news:
uDytKmc#
Bonjour Faya49,

Disons que dans la procédure que tu as récupérée, tu as
droit à une fermeture d'excel très spécial...
un peu longuet à expliquer !

La façon de faire normalement utilisée :
Il faut d'abord fermer tous les classeurs qui sont ouverts dans cette
instance.

Selon que tu veuilles ou non enregistrer tes fichiers ouverts, il y a
quelques

variantes ...

Ceci ferme tous les classeurs ouverts et enregistre
chacun d'eux. Si tu remplace "true" par "false" dans
la procédure, tout va se fermer sans enregistrement au préalable
'-------------------
Sub FermerExcel()
For each Wk in Workbooks
Wk.Close True
next
Applicatation.Quit
End sub
'-------------------

Si tu veux qu'excel te demande pour chacun des fichiers ouverts si tu
désires sauvegarder ton fichier,

Application.Quit


Salutations!


"Faya49" a écrit dans le message de
news:

Toujours super extra ton chrono, et ce qui m'épate le plus c qu excel se
ferme a la fin. A ce propos je voudrais pouvoir faire la même chose mais
en

cliquant sur un bouton, peut tu medire comment faire ?

merci et @+




Avatar
docm
Uniquement pour pour faire avancer le schmilblick,
si j'ai ouvert successivement 3 classeurs, et que le code suivant se trouve
dans le premier classeur avec comme objectif de fermer tous les 3 classeurs,
Sub FermerExcel()
For each Wk in Workbooks
Wk.Close false
next
stop
Application.Quit
End sub
le code ne parviendra jamais à la commande Stop, car le classeur contenant
ce code sera fermé et ce code interrompu avant que les autres classeurs
soient fermés.

docm


"michdenis" a écrit dans le message news:
uu8ZvNs#
Bonjour Docm,

Je ne sais pas où tu veux en venir avec ta remarque....

Mais si la ligne de code "Application.Quit" s'exécute, peu importe le
nombre de classeurs ouverts dans cette instance d'excel et peu

importe dans quel classeur est écrite cette ligne de code, Excel demandera
à l'usager s'il désire sauvegarder chacun des fichiers

ouverts, ou, tout au moins les fichiers qui ont été modifiés depuis leur
ouverture.


À l'évidence même, si tu places devant cette ligne de commande
"Application.Quit, cette autre ligne de code "ThisWorkbook.Close

False" ...le problème ne se situe pas au niveau d'excel mais à 12 pouces
de l'écran.



Salutations!



"docm" a écrit dans le message de news:
OI%23afKo%

Bonjour michdenis.
Pour que tous les classeurs soient fermés correctement, il ne faut pas
fermer le classeur ThisWorkbook avant d'avoir fermé tous les autres
classeurs sinon la procédure va être interrompue prématurément.

docm

"michdenis" a écrit dans le message news:
uDytKmc#
Bonjour Faya49,

Disons que dans la procédure que tu as récupérée, tu as
droit à une fermeture d'excel très spécial...
un peu longuet à expliquer !

La façon de faire normalement utilisée :
Il faut d'abord fermer tous les classeurs qui sont ouverts dans cette
instance.

Selon que tu veuilles ou non enregistrer tes fichiers ouverts, il y a
quelques

variantes ...

Ceci ferme tous les classeurs ouverts et enregistre
chacun d'eux. Si tu remplace "true" par "false" dans
la procédure, tout va se fermer sans enregistrement au préalable
'-------------------
Sub FermerExcel()
For each Wk in Workbooks
Wk.Close True
next
Applicatation.Quit
End sub
'-------------------

Si tu veux qu'excel te demande pour chacun des fichiers ouverts si tu
désires sauvegarder ton fichier,

Application.Quit


Salutations!


"Faya49" a écrit dans le message de
news:

Toujours super extra ton chrono, et ce qui m'épate le plus c qu excel se
ferme a la fin. A ce propos je voudrais pouvoir faire la même chose mais
en

cliquant sur un bouton, peut tu medire comment faire ?

merci et @+









1 2