Format numérique

Bonjour,

J'aimerai dans ma macro, j'ai des variables publiques de type currency, et lorsque je les exporte vers outlook, j'aimerai qu'elle s'affiche comme suit:

250 000,00 €, j'aimerai donc changer le format numérique de cette variable et je ne sais pas comment m'y prendre.

Sub Macro1()

Dim p As Double
p = Range("J17").Value

p.Value = Format(p, "#,##0.00€")
MsgBox (p)

End Sub

dans le cas ci dessus il va toujours m'affichier 250000 sans espace et sans l'euro.

Pouvez vous m'aider?

Merci

Bonjour,

Je pense qu'un petit tour dans les cours VBA de ce forum ne vous ferais pas de mal

Vous confondez variable simple avec variable objet

Sub Macro1()
  Dim p As Double
  p = Range("J17").Value
  MsgBox Format(p, "#,##0.00€")
End Sub

@+