La Web del Programador: Comunidad de Programadores
 
    Pregunta:  10438 - PROBLEMAS CON ONACTION
Autor:  Manuel Gómez Zamorano
Yo tengo VISUAL BASIC 5.0, WINDOWS'95 y EXCEL'97.
Pues bien el problema que tengo es el siguiente :
Desde VB abro un documento EXCEL; a este documento le quito todos los menus que trae implicita la hoja EXCEL, y creo un menu personalizado mediante las siguientes instrucciones, por ejemplo :

set x = CommandBars.Add(Name:="Menu", position:= ...)
set y = x.Controls.Add
Whith y
.FaceId = 26 'por ejemplo
.Caption = "Hola" 'por ejemplo
.OnAction = "Prueba" 'por ejemplo
End With

Private Sub Prueba()
MsbBox "hola"
End Sub

El menu se ejecuta pero me falla en la propiedad "OnAction". Cada vez que lo ejecuto me dice que "me falta la macro Prueba". Esto tambien con cualquier otro menu copiado de los ejemplos de VB 6, y que incluya la propiedad "OnAction".
Gracias a quien me pueda ayudar.

  Respuesta:  Ronald Cabrera
Quita el private al procedimiento prueba y excel te reconocera prueba como una macro...

espero que te sirva...