Autres résultats differents entre formule et macro (excel 2007)

Sub TestMultiplication()
    ' Une valeur très précise
    Dim texte As String
    texte = "0,123456789012345678901234567890"
    
    ' --- CAS 1 : LE VARIANT ---
    Dim v As Variant
    v = texte ' v contient le texte, "0,123456789012345678901234567890".
    
    ' On fait une opération mathématique neutre (x 1).
    ' VBA est FORCÉ de convertir le texte en nombre.
    ' Comme c'est un Variant "libre", il choisit le format standard : Double.
    v = v * 1
    
    ' --- CAS 2 : LE STRING + CDEC ---
    Dim d As Variant
    ' On force explicitement le meilleur format de nombre avant de calculer
    d = CDec(texte) * 1
    
    ' --- RÉSULTAT ---
    MsgBox "Variant (Auto Double) : " & v & vbCrLf & _
           "String (CDec forcé)   : " & d
          
    ' Ce que l'on vois :
    ' Variant : 0,123456789012346  (Arrêt brutal à la 15ème décimale)
    ' String  : 0,1234567890123456789012345679 (Précision conservée jusqu'à 28)
End Sub