VBA excel Comment ne pas supprimer les zéros Résolu/Fermé

Question

Bonjour, 

Comment obtenir dans une variable, un montant saisi dans une cellule(personalisée "0000,00") sans perte des zéros significatifs et non significatifs.

Exemples:
- un montant saisi "0002,10"  devient dans une variable "2,1"
- un montant saisi "0004,00" devient dans une variable "4"

le code dans la macro est :

Dim Mt string * 7

Mt = Cells(19, 5).Value

Msgbox mt 


Avec mes remerciements.

Cordialement.

m@rina · Answer

Bonsoir,  

Il faut que tu imposes le format dans ton code. Et ta variable ce n'est pas du String. 

Dim Mt as Integer 
Mt = Format(Cells(19, 5), "0,000.00")
Attention de bien le mettre en format américain dans la macro, même si tu es en format français. 

m@rina 

- "Sur le forum bureautique, on pose des questions concernant la bureautique..." 
- "Ah bon ???"

SYBY · Answer

Bonjour,

Merci à M@rina et  Eriic, aux réponses que vous m'apportez et qui m'ont permises une adaptation à mon besoin !...


Dim Mt As String

Mt = Format(Cells(19, 5).Value, "0000.00")


Exemple: la cellule contient "00012,30" et j'obtiens dans "Mt" le même contenu

Cordialement.

VBA excel Comment ne pas supprimer les zéros

2 réponses

Discussions similaires