Vba, conserver un formatage dans une msgbox
rixm86
-
michel_m Messages postés 18903 Date d'inscription Statut Contributeur Dernière intervention -
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
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:
- Vba, conserver un formatage dans une msgbox
- Formatage pc - Guide
- Formatage clé usb - Guide
- Formatage apfs - Guide
- Formatage conditionnel excel - Guide
- Formatage exfat ou ntfs - Guide