Souci code la tranformation d'une donnée en numérique

Bonjour Le Forum

Au sein d'une boucle, j'extrais en colonne B, les six premiers caractères des données contenues en colonne E (N° de compte à 6 chiffres suivis de son libellé).
Je voudrais que ces 6 premiers caractères soient transformées en numériques.
Pour cela j'ai écris le code suivant qui ne fonctionne pas

Range("B" & a) = Value(Left(Range("E" & a), 6))

Pourriez vous m'aider ,

Merci par avance,

Hugues