Excel - ejecutar *.xla con boton de barra de comandos

Hola a todos,
Tengo una macro que funciona y la he convertido en aplicacion (xla). El caso es que para que quedase 'chulo' del todo quería que tuviese una barra de herramientas propia y al clickear el boton se ejecutase la aplicacion.
Buscando en los foros he encotrado como hacer la barra, el boton, el dibujo.... pero no entiendo muy bien la propiedad OnAction, mirando la ayuda de VB viene como ejecutar macros, pero no me entero de como 'llamar' a mi aplicacion xla.
Os pongo el código que he escrito a ver que se os ocurre.
Mil gracias de antemano.
guihe

CODIGO:
Sub BARRA()
Dim BARRA As CommandBar
Dim BOTON As CommandBarButton

Set BARRA = CommandBars.Add(Name:="PINEA2", _
Position:=msoBarTop, temporary:=True)
Set BOTON = BARRA.Controls.Add(Type:=msoControlButton)
BOTON.Picture = LoadPicture("Z:\_Guillepinea.bmp")
BARRA.Visible = True
BOTON.OnAction = "APLICACION.xla" 'AQUI ES DONDE ESTOY ATASCADO ;)
End Sub