Vba, conserver un formatage dans une msgbox

rixm86 -  
michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

Je commence depuis peu le VBA et j'ai une petite question:

Je travaille sur des balances comptables qui comportent des chiffres tres importants. Pour travailler, j'ai donc choisi pour plus de lisibilité l"affichage numérique sans décimale avec le compteur de milliers #,##0

Dans ma macro en VBA j'ai dimensionné toutes mes colonnes contenant des chiffres ainsi

Lorsque la somme des éléments de la balance n'est pas nulle, il y a un problème et je tiens à le signaler par un message.
Or dans ma boite message la mise en forme du nombre n'est pas conservée. Voici ce que j'ai écrit:

Total = Range("F1").Value

If Total = "0" Then
Controle = "La Balance Générale est équilibrée"
Else: Controle = "La Balance Générale n'est pas équilibrée de " & Total & "FCFP" & vbNewLine
Controle = Controle + "Veuillez vérifier la Balance Générale"
End If


(FCFP= Franc Pacifique, ce qui explique les longs nombres...)

Ma cellule F1 est formatée en #,##0 et d'après ce que j'ai compris jusqu'ici, .value est censé conserver le formatage

Or en cas d'erreur le message affiche le nombre contenu en F1 mais sans ce formatage.

A priori je n'ai donc pas bien compris la nature de .Value...

Quelqu'un pourrait-il m'expliquer comment faire pour conserver ce formatage dans mon message

(bien entendu c'est un peu du chipotage mais je pense que ca me permettrait de mieux comprendre certains rouages du langage)

Merci d'avance
A voir également:

3 réponses

michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 318
 
Bonjour,

format(tavaleur,"le format désiré entre guillemets")

Michel
1
Archi-dessin Messages postés 273 Statut Membre 25
 
slt
la nature de .value prend des valeurs byte
si vous n'arrivez pas à résoudre votre probl faite moi un message et j"essaie de le résoudre
à bientôt
1
michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 318
 
..."la nature de .value prend des valeurs byte"...

FAUX!!
1