format dans un textbox

[JC de Lorient]

Bonsoir le forum

malgré quelques recherches je n'ai rien trouver pour mon souci qui me semble pourrtant très simple

comment faire pour que lorsque je rentre 12555 dans mon text box il m'affiche 12 555.00
c sans doute une question de format mé là je coince !!

Private Sub TBoxMt_Change()
TBoxMt.Value = Format(TBoxMt.Value, '0,00')
End Sub

merci a vous

JC

 

[PascalXLD]

re

Cdbl(textbox1.value)

te convertit ton textbox en nombre mais avec les chiffres après la virgule ce qui n'est pas le cas du val

Edition

Le mieux je me répète serait de mettre un morceau du fichier

Message édité par: Pascal76, à: 21/04/2005 12:23

 

[JC de Lorient]

re tout le monde

ci joint une partie de mon fichier ai été obligé de virer pas mal de choses j'espère que ça fonctionnera kan même

le USF se lance par le bouton 'menu'

je pense que bcp de choses sont plus bonnes dans mon VBA car l'ai enregistrer tel qu'il était

merci bcp a vous

JC [file name=Copie de ProductionV2_20050421124057.zip size=49647]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Copie de ProductionV2_20050421124057.zip[/file]

 

[PascalXLD]

Re

Petit essai

Je t'ai aussi forcer les optionbutton

Bon courage [file name=ProductionV2.zip size=36686]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/ProductionV2.zip[/file]

 

[JC de Lorient]

re le forum, Pascal

merci de ce que tu as fait
maintenant je vé essayer de comprendre tout ça
j'aurais surement d'autre demande a venir !!

merci encore

JC

 

[JC de Lorient]

re tout le monde

je reviens vous voir car ça marche pô !!

j'ai ce code :

Sub testOBtype()
Dim i As Byte
Dim pasbon As Boolean

pasbon = False

For i = 1 To 3
If Controls('OB' & i).Value = True Then
pasbon = True
End If
Next i

If pasbon = False Then MsgBox 'coché un optionbutton'

End Sub

J'appelle cette macro a l'intérieur d'une autre macro mé ça fonctionne pas
je ne sé pas comment définir Controls

merci bcp !
JC

 

[PascalXLD]

Re

En principe tu n'en as plus besoin puisqu'au moins 1 des optionbutton est coché avec ce que je t'ai mis dans l'exemple

Je comprends pas ce que tu veux tester dans ce cas

 

[JC de Lorient]

Re Pascal

suis navré, en effet j'ai oublié de préciser que j'aurais aimé éviter d'avoir un bouton coché par défaut pour éviter tout risque d'erreur pas trop sur ce USF mais sur les calculs qui vont en découler

Merci mille fois

JC

 

[PascalXLD]

Bonjour

Excuse moi je viens de rentrer après être parti hier fin d'après-midi

Je te joins le fichier modifié

Par contre je ne pourrais regarder tes remarques que lundi je ne pense pas pouvoir regarder le PC d'ici là

Bon courage [file name=ProductionV2_20050422170107.zip size=38428]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/ProductionV2_20050422170107.zip[/file]

 

[JC de Lorient]

Salut Pascal !

Merci pour le fichier modifié
j'avais réussi à faire un truc mé pas aussi bien que le tien

ça marche comme je veux

Tu verras sans doute lundi que j'ai un nx post
Ben oui ayant réussi celui çi je voudrais aller plus loin maintenant

mille merci pour ton aide

JC