Bonsoir,
après nettoyage de la macro :
ActiveCell.TextToColumns Destination:=ActiveCell.Offset(0, 1), DataType:=xlDelimited, OtherChar:="."
avec activecell la cellule où se trouve la valeur de départ
et destination "à partir de la colonne d'à coté sur la même ligne
pas de notion de formule à écrire avant donc longueur de la variable variable !
@ bientôt
LouReeD