Recopie d'un nombre du type 00000360 dans une autre cellule en VBA

Bonjour,
avec VBA, je veux créer une variable toto qui égale le contenu d'une
cellule.
Cette cellule peut aussi bien contenir 0000360 que 0008742 ou encore 0000031
(toujours 7 chiffres)
Ensuite je dis que le contenu d'une autre cellule doit contenir la valeur de
cette variable

Exemple :
en A1, j'ai 0000360
j'ai donc la variable toto qui doit être égale à 0000360
et je souhaite dire que la cellule B1 soit égale à toto pour qu'en B1, j'ai
0000360

mais en VBA, le code que j'utilise me donne
toto= range("A1") donne 360 et pas 0000360

Merci.
Caroual