Format mode ingenieur pour VBA

Bonjour LUST et merci pour ta réponse
Mais cela ne me suffit pas , il faut que le format de sortie soit toujours en mode ingenieur .C'est à dire un multiple de 3 . Dans ton example format( 20000,"0.00E+")
ton resultat est 2,00E+4
et moi je veux que cela sorte sous forme 20,00E+3
pour 2000 je veux 2,00 E+3
pour 100 je veux 100 E+0
pour 0.05 je veux 50,00E-3
Il faut d'exposanr E soit toujours un multiple de 3 .
soit E+3 ou E+6 ou E-12 ou E-9 etc
Si tu as une solution Merci d'avance

tu sera obligé de créer une fonction qui force l'exposant à être un mulitple de 3!

tu peux essayer quelque chose du genre ###,00E+00
ca marche sous excel...

Perso j'ai trouvé ça sur internet :

Function FormatEngineering(Number As Variant, Optional DecimalPlaces
> As Long = 1) As String
> Dim Exponent As Long
> Dim Parts() As String
> Parts = Split(Format(Number, "0.0#############E+0"), "E")
> Exponent = 3 * Int(Parts(1) / 3)
> FormatEngineering = Format(Parts(0) * 10 ^ (Parts(1) - Exponent), _
§>§ "0." & String(DecimalPlaces, "0")) & _
§>§ "E" & Format(Exponent, "+0;-0")
> End Function

Je ne l'ai pas testé car je n'y connais rien en macro Excel mais je cherche aussi à avoir ce type d'affichage donc je vais m'y mettre !

Ca marche, moi j'ai essayé ça dans la fenêtre d'execution :

?format(20000,"0.00E+")
2,00E+4

En procédant de la sorte :

Public Function strIngenieur(ByVal dblVar As Double) As String
strIngenieur = Format(dblVar, "0.00E+")
End Function

Ca fonctionne :

?strIngenieur(2000000000)
2,00E+9

Voila

Ben désolé, sais pas quoi c'est ca "Ingénieur"