S
Stt
Guest
Bonjour tlm,
Actuellement j'utilise le code VBA suivant dans mon application :
ActiveCell.Offset(3, 0).Value = "Coût : " & Left(CStr(prixmatiere), InStr(1, CStr(prixmatiere), ",") + 2) & " € Marge : " & MargeTube
où prixmatiere, margetube sont des nombres.
La formule (très lourde à mon avis) est censé afficher du texte et le prixmatiere avec 2 chiffre après la virgule.
Le problème est que lorsque le nombre est un entier, je n'ai que les 2 premiers chiffres (normal puisque Instr ne trouve pas de ",").
Pourrait-on pas simplifier ce code pour qu'il soir valable pour n'importe quel nombre avec ou sans virgule.
Merci d'avance
Stt
Actuellement j'utilise le code VBA suivant dans mon application :
ActiveCell.Offset(3, 0).Value = "Coût : " & Left(CStr(prixmatiere), InStr(1, CStr(prixmatiere), ",") + 2) & " € Marge : " & MargeTube
où prixmatiere, margetube sont des nombres.
La formule (très lourde à mon avis) est censé afficher du texte et le prixmatiere avec 2 chiffre après la virgule.
Le problème est que lorsque le nombre est un entier, je n'ai que les 2 premiers chiffres (normal puisque Instr ne trouve pas de ",").
Pourrait-on pas simplifier ce code pour qu'il soir valable pour n'importe quel nombre avec ou sans virgule.
Merci d'avance
Stt