Separar datos

Que tal.

Me pueden ayudar a generar una macro para separar datos de una celda…
Por ejemplo.

En la Celda A1 tengo “W976829_SAA2259-30_Rev”

Me gustaria tener una macro que me separe los datos (por el carácter “_”),
los tome como objetos para poderlos agregar en otras celdas, por ejemplo:


A1: W976829_SAA2259-30_Rev

Ws = W976829
NP = SAA2259-30
Rv = Rev

Despues:
Celdas:
A2= Ws (W976829)
A3= NP (SAA2259-30)
A4= Rv (Rev)

Muchas gracias…