Format nombre

Staple1600

XLDnaute Barbatruc

• 17 Novembre 2008

• #2

Re : Format nombre

Bonjour

Essaie

Code:

TextBox222.Value = Val(TextBox220) * 19.6 / 100
TextBox224.Value = Val(TextBox220) * 1.196
TextBox24 = Format(Val(TextBox24), "##.00")

 

Vote positif 0 Vote négatif

J

jmd2

XLDnaute Accro

• 17 Novembre 2008

• #3

Re : Format nombre

hello

rappel : éviter de coder des taux en dur (ici la TVA)
ils peuvent changer, et on peut exporter avec une TVA zéro.

*****

 

Vote positif 0 Vote négatif

Manu62

XLDnaute Impliqué

• 17 Novembre 2008

• #4

Re : Format nombre

Bonjour,

J'ai essayé le code staple mais rien y fait. toujours en standart
Merci pour l'info jmd2.

en enlevant cela TextBox24 = Format(Val(TextBox24), "##.00")
ca fonctionne ?

Merci
Manu

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 17 Novembre 2008

• #5

Re : Format nombre

Re

En suivant le conseil de jmd2

et avec cette modif (en rouge)
(tu avais une erreur de frappe non? )

Code:

Private Sub CommandButton1_Click()
Dim Taux As Double
Taux = 0.196
TextBox222 = Val(TextBox220.Value) * Taux
TextBox224 = Val(TextBox220.Value) * (1 + Taux)
TextBox[COLOR=Red][B]224[/B][/COLOR] = Format(CDbl(TextBox[B][COLOR=Red]224[/COLOR][/B]), "##.00")
End Sub

 

Dernière édition: 17 Novembre 2008

Vote positif 0 Vote négatif

Manu62

XLDnaute Impliqué

• 17 Novembre 2008

• #6

Re : Format nombre

Staple,

Désolé mais sa beug encore
ci dessous tous le code, c'est peux être avant...

Private Sub CommandButton81_Click()
Dim Taux As Double
Taux = 0.196
TextBox220.Value = Val(TextBox28) + Val(TextBox38) + Val(TextBox48) + Val(TextBox58) + Val(TextBox68) + Val(TextBox78) + Val(TextBox88) + Val(TextBox98) + Val(TextBox108) + Val(TextBox118) + Val(TextBox128) + Val(TextBox138) + Val(TextBox148) + Val(TextBox158) + Val(TextBox168) + Val(TextBox178) + Val(TextBox188) + Val(TextBox198) + Val(TextBox208) + Val(TextBox218)
TextBox222 = Val(TextBox220.Value) * Taux
TextBox224 = Val(TextBox220.Value) * (1 + Taux)
End Sub

Merci

Manu

 

Vote positif 0 Vote négatif

Manu62

XLDnaute Impliqué

• 17 Novembre 2008

• #7

Re : Format nombre

Bonjour,
Info complémenataire
J'ai retourné un peu dans tous les sens,
je remarque que c'est un problème de format que sur mes tb calculé?


Merci d'avance
Manu

 

Vote positif 0 Vote négatif

Manu62

XLDnaute Impliqué

• 18 Novembre 2008

• #8

Re : Format nombre

Bonjour le forum,

un petit retour en haut.

Merci de votre aide

Manu

 

Vote positif 0 Vote négatif

Manu62

XLDnaute Impliqué

• 18 Novembre 2008

• #9

Re : Format nombre

Bonjour

J'ai mis cette formule et c'est ok maintenant
Si vous avez mieux...

TextBox222.Value = Val(TextBox220) * Taux / 1
TextBox224.Value = Val(TextBox220) * (1 + Taux) / 1

Manu

 

Vote positif 0 Vote négatif

Manu62

XLDnaute Impliqué

• 19 Novembre 2008

• #10

Re : Format nombre

Bonjour,

Je suis allé trop vite hier. Le code ne va pas.
Ci dessous mon code. Si je vais dans le classeur concerné, ilme dit que les chiffres sont en mode texte. Et il me donne le choix de modifier l'erreur. passer du format texte en nombre.

Quelqu'un peux t'il m'aider .

Merci bcp

Manu


Private Sub CommandButton81_Click()
Dim Taux As Double
Taux = 0.196
TextBox220.Value = Val(TextBox28) + Val(TextBox38) + Val(TextBox48) + Val(TextBox58) + Val(TextBox68) + Val(TextBox78) + Val(TextBox88) + Val(TextBox98) + Val(TextBox108) + Val(TextBox118) + Val(TextBox128) + Val(TextBox138) + Val(TextBox148) + Val(TextBox158) + Val(TextBox168) + Val(TextBox178) + Val(TextBox188) + Val(TextBox198) + Val(TextBox208) + Val(TextBox218)
TextBox222 = Val(TextBox220.Value) * Taux
TextBox224 = Val(TextBox220.Value) * (1 + Taux)
TextBox224 = Format(CDbl(TextBox224), "##.00")
End Sub

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 19 Novembre 2008

• #11

Re : Format nombre

Bonjour



Pourquoi ne pas joindre un fichier exemple (avec ton code VBA) ?

(sans données confidentielles et zippé)

 

Vote positif 0 Vote négatif

Manu62

XLDnaute Impliqué

• 19 Novembre 2008

• #12

Re : Format nombre

Bonjour Stample, le forum

Je voudrais mais il fait 2 MO, et il ya bcp de données internes.

Je me demande si'il n'ya pas quelque chose a faire dans les propriétés de la textbox. Peux être mettre un true quelque part

Qu'en penses tu ?

Cdt

Manu

 

Vote positif 0 Vote négatif

Manu62

XLDnaute Impliqué

• 19 Novembre 2008

• #13

Re : Format nombre

Stample, le forum

Voici un fichier essai.

Cijoint.fr - Service gratuit de dépôt de fichiers

Merci

Manu

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 19 Novembre 2008

• #14

Re : Format nombre

Re

Ton fichier essai fonctionne non?
Essaie de créer une copie du fichier qui pose problème
en ôtant au préalable les images (s'il y en a), les couleurs dans les cellules,

Ne garde que 10 lignes par feuilles
Par contre , conserve tout le code VBA (module et module de classe) et les userforms.

• Quelle est la taille de la copie expurgée?

En dernier recours, pour créer la copie:

1. Tu nettoies les feuilles comme précédemment d'une copie de l'original .(10 lignes par feuilles)
2. Tu insères une nouvelle feuille dans ce classeur
3. Tu crées un classeur (classeur vierge)
4. Tu déplaces (cliquer/déposer) toutes les feuilles de l'original (sauf celle que tu viens d'insérer) dans ce nouveau classeur.
5. Tu déplaces (dans VBE) tout le VBA (cliquer/déposr également) vers le projet VBA du nouveau classeur.

Tu enregistres ce nouveau classeur.

• Quelle taille fait-il?

• Tu zippes le fichier le moins volumineux et tu le postes sur le forum.

 

Vote positif 0 Vote négatif

Manu62

XLDnaute Impliqué

• 19 Novembre 2008

• #15

Re : Format nombre

Stample, le forum

Ci joint élement en plus dans mon fichier nombre.

Cijoint.fr - Service gratuit de dépôt de fichiers


Faire divers modif au niveau de la base (oui/non)
clic sur bouton et voir résulat en page 4
prob sur somme tva + ttc
il est a ce niveau mon prob.
je pense que mes données ht et ttc sont pas au bon format.

merci d'avance

Manu

 

Vote positif 0 Vote négatif