VBAConversion

Dim SIM As Single ' flottants simple précision

Dim ENT As Integer

Dim ENT2 As Integer

Dim ENT3 As Integer

Dim CHA As String

Dim CHA2 As String

Dim CHA3 As String

Liste des conversions classiques :

La syntaxe est toujours : VarDeTypeFinal = Cxxx (VarDeNimporteQuelType)

Exemples :

SIM = 3.1416

CHA = CStr(SIM)

Dans le cas d'un booléen : 0 = Faux, le reste = Vrai

ENT2 = 5: ENT3 = 5

Vérifie = CBool(ENT2 = ENT3) ' Vérifie contient la valeur Vrai.

Fonctions de conversions disponibles

Autres fonctions de conversions

Conversions de flottants en entiers :

SIM = 3.14

ENT = Fix(SIM)

Conversions de nombres en chaînes :

SIM = Val("24.5") ' Renvoie 24,5.

SIM = Val("24.51") ' Renvoie 24,51.

ENT = Val("24.5") ' Renvoie 24.

ENT = Val("24.51") ' Renvoie 25.

ENT = Val(" 2 45 7") ' Renvoie 2457.

ENT = Val("24 et 57") ' Renvoie 24.

Conversions de chaînes en nombres

CHA = Str(459) ' Renvoie " 459".

CHA = Str(-459.65) ' Renvoie "-459,65".

CHA = Str(459.001) ' Renvoie " 459,001".

Exemple complexe de ChaineNum

A noter : Le point décimal au lieu de la virgule

CHA2 = "19"

CHA3 = "95"

SIM = Val(CHA2 + "." + CHA3)

Range("A1").Select

ActiveCell.FormulaR1C1 = SIM