XL 2013 macro pour diviser des valeurs d'une cellule, séparées par un /, en plusieurs autres

Bonjour,
je souhaiterais créer une macro me permettant, à partir d'une liste, de diviser plusieurs valeurs, contenues dans une cellule, mais séparées par un /, en plusieurs autres cellules.
par exemple, si j'ai dans une colonne A:
1545
1245/4512
1645
1548/1875/6856

avec la macro, j'obtiendrai:
1545
1245
4512
1645
1548
1875
6856


Pourriez-vous m'aider? Je vous remercie d'avance