Cellule issue d'une textbox a ne pas vider pour faire des calculs automatique

CATA56

XLDnaute Nouveau
Bonjour le forum,

Dans un USF j'ai plusieurs textbox qui me permettent de faire des calculs que je peux modifier lorsque le USERFORM est ouvert.
Par contre je voudrai empêcher la suppression de donner ou la mise à vide d'une cellule parce que ça bloque mon code et donc les calculs.
Je vous joins un fichier qui sera plus parlant.
Il faut que j'ajoute encore les calcules de PT = Pu x Qté
Mais surtout revoir les problèmes de calcul qui ne sont pas efficace lorsque je modifie soit le PU net ou la remise.
A bientôt

CATA56
 

Pièces jointes

  • test3.xlsm
    87.6 KB · Affichages: 58
  • test3.xlsm
    87.6 KB · Affichages: 57
  • test3.xlsm
    87.6 KB · Affichages: 61

jp14

XLDnaute Barbatruc
Re : Cellule issue d'une textbox a ne pas vider pour faire des calculs automatique

Bonsoir

Dans une boite de saisie les données sont du type "string", pour faire des calculs il faut transformer les données en valeur numérique en utilisant les fonctions de conversion de types de données comme Csng, Ccur , Cdbl.

TextBox14 = clsng(TextBox13) - (csng(TextBox13) * csng(TextBox18) / 100)

Il faut faire attention à la virgule, il faut parfois remplacer le symbole "," par un point.

JP

JP
 

CATA56

XLDnaute Nouveau
Re : Cellule issue d'une textbox a ne pas vider pour faire des calculs automatique

Bonsoir le fil, bonsoir le forum,

Merci jp14 pour ton aide.
J'ai modifié mon fichier comme tu me l'as indiqué mais cela ne fonctionne pas non plus.
Je ne vois pas ce qui bloque.
Si tu peux m'aider.
A bientôt
CATA56
 
D

Denis

Guest
Re : Cellule issue d'une textbox a ne pas vider pour faire des calculs automatique

Bonjour le fil,
Un 3l" s'est glissé par erreur dans la formule de jp14, il faut lire :
TextBox14 = csng(TextBox13) - (csng(TextBox13) * csng(TextBox18) / 100)
Sinon tu as aussi :
TextBox14 = val(TextBox13) - (val(TextBox13) * val(TextBox18) / 100)

Bon courage et à +
Denis
 

Statistiques des forums

Discussions
312 499
Messages
2 088 999
Membres
104 002
dernier inscrit
SkrauzTTV