Format "chronomètre" dans une textbox

[Arsène_Lupin]

Bonjour à tous,

Je suis en train de faire une appli excel qui répertorie des temps (format "m:ss,000" sur les feuilles de calcul).

Je souhaite faire apparaître des temps sur un userform, dans des textbox. Mais le format a l'air de poser problème...

Par exemple, si je veux faire apparaître dans ma textbox1 le range ("A1") de la feuille "Joueurs", qui vaut "1:17,542", j'ai essayé le code:

textbox1.value=format(sheets("Joueurs").range("A1"),"m:ss,000")

Ca retourne "12:18,000" au lieu de "1:17,542" !!!

Idem si j'écris textbox1.value=format(textbox1.value,"m:ss,000")


Merci de m'éclairer de vos lumières!!!

A+++

 

[Arsène_Lupin]

Bon,

J'ai trouvé une solution à moitité satisfaisante...

Je convertis d'abord mon temps au format "m:ss,000" en texte sur la feuille de calcul, et je renvois ce format texte tel quel dans mon textbox1...

Ca affiche bien "1:17,542", mais comme du texte. Du coup, si je veux faire du calcul sur les temps dans le userform je ne peux pas utiliser le contenu des textbox!!!

Exemple de code:

sur ma feuille "Joueurs" en A1 j'ai "1:17,542" au format "m:ss,000"
En A2, j'ai la formule "=texte(A1;"m:ss,000")

Sur mon userform, j'ai le code:
textbox1.value=sheets("Joueurs").range("A2")

Il y a forcément un moyen d'afficher directement dans un textbox des temps avec minute, secondes et millièmes...

Aidez moi SVP

 

[Michel B.]

bonjour,

textbox1.value=sheets("Joueurs").range("A2")

textbox1.value=format (sheets("Joueurs").range("A2"),"mm:ss,000")

@+
Michel (Alias Arsène Lupin -> http://www.oricom.ca/lupin/)

 

[Arsène_Lupin]

Re: Format

Bonjour Michel,

Si j'ai bien compris, il suffit de déclarer la valeur de textbox1 en deux étapes (donner la valeur de la cellule et ensuite indiquer un format) pour que ça fonctionne!!!

Je vais essayer dès ce soir...

Merci beaucoup

 

[Michel]

Re: Format

Salut,

une seule étape suffit, j'ai mis la première ligne pour que tu comprennes
la nuance :

textbox1.value=format (sheets("Joueurs").range("A2"),"mm:ss,000")


Michel