macro - extraer texto de un string - ayuda

Por ejemplo asi:

Sub test1()
MsgBox Right([B1], Len([B1]) - InStr([B1], " "))
End Sub

o bien

Sub test2()
MsgBox Mid([B1], InStr([B1], " ") + 1, Len([B1]))
End Sub

o bien

Sub test3()
MsgBox Mid([B1], InStr([B1], " ") + 1, 255)
End Sub

Saludos,
KL


"Nora" wrote in message news:

Como hago para poner esta sentencia en
una macro vba
ÞRECHA(B1;LARGO(B1)-HALLAR(" ";B1))
gracias
Nora