Discussion :

[pilounet54]

bonjour à tous
peut on attribuer d'office le signe moins dans le texbox exemple :

si on met une valeur positive il retounera en valeur negative dans la cellule


merci les pros !

[jfontaine]

Bonjour,

Plusieurs possibilités (en voici 2)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Range("A1").Value = Val(Textbox1.Text) * -1
range("A1").Value = "-" & textbox1.Text

[pilounet54]

bonjour
encore moi! peut on ne pas renvoyer de signe si texbox est vide

excemple dans ceci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

.Cells(Lg, 10) = "-" & Val(TextBoxdepenses)

car erreur dans les formules cela me revoie le signe moins

c'est bien dans le sens qu'il attribue le signe comme je le souhaite mais pas si il n'y pas de valeur
merci pour votre rapidité "on en a besoin les vieux ! en retraite"

[mercatog]

A tout hasard

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

.Cells(Lg, 10).Value = -1 * Val(TextBoxdepenses)

[pilounet54]

non cela ne fonctionne pas bug mais merci

[mercatog]

Parce que tu ne l'as pas bien appliqué ou bien quelque chose que je n'ai pas compris.

Une explication du code et du fichier t'aiderait.

[pilounet54]

dans ces deux solutions cela envoie si le texbox est vide le signe - dans la cellule et les formules n'aime pas #valeur

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

.Cells(Lg, 10) = "-" & Val(TextBoxdepenses)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

.Cells(Lg, 10).Value = -1 * Val(TextBoxdepenses)

j'essaye, mais pour l'instant pas de résultat concluant merci

[mercatog]

Cette ligne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

.Cells(Lg, 10).Value = -1 * Val(TextBoxdepenses)

devra envoyer un nombre négatif ou 0 si le Textbox est vide.

[pilounet54]

merci vous etes tous des chefs
bonne journée