Merci bien pour la première réponse
Concernant la seconde, c'est vrai que j'aurais dû trouver. J'avais pourtant cherché mais j'étais tombé sur un exemple du type : expression.Replace(What, Replacement, LookAt, SearchOrder, MatchCase, MatchByte, SearchFormat, ReplaceFormat)
Je vais donc utiliser cela :
Variable2 = Replace(Variable, " ", "" )