VBA excel Comment ne pas supprimer les zéros

Résolu
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.

2 réponses

  1. Modérateur
    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 ???"
    0
    1. Contributeur
      Bonsoir tout le monde,

      Juste une modif à la proposition de m@rina :
      dim Mt as double
      (ou single ou currency)

      vu que c'est un nombre décimal

      eric
      0
  2. 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.
    0