Compte à rebour

Xxaann

XLDnaute Occasionnel
Bonjour,

J'aimerai afficher dans un UserForm un compte un rebour en minutes et secondes.
J'ai regarder sur l'ensemble des discussion sur le forum, mais je ne trouve rien.

Pouvez-vous m'aider...

A+
 

Xxaann

XLDnaute Occasionnel
Re : Compte à rebour

Merci Kjin, ton fichier est tip top.

Reste plus qu'à adapter à mon besoin.

C'est toujours un plaisir de venir sur ce forum, des gens sympas qui partagent leur expérience avec des novices comme moi.

Bye
Xxaan
 

Fo_rum

XLDnaute Accro
Re : Compte à rebour

Salut,

par exemple :

Dans la feuille du bouton de lancement,
Insertion
Objet ...
Son Wave
Clic, bouton droit, sur l'objet,
Objet Document Magnétophone
Modifier
Enregistrer le "son".

Déplacer éventuellement l'objet pour le cacher.

Dans l'éditeur VB :

Insérer les lignes suivantes aux 2 moments prévus pour l'arrêt du chrono :
ActiveSheet.Shapes("Object 1").Select
Selection.Verb Verb:=xlPrimary
en faisant attention au nom de l'objet !
 

Discussions similaires

Statistiques des forums

Discussions
312 429
Messages
2 088 350
Membres
103 822
dernier inscrit
kader55