Hola emilio.. muchas gracias por tu respuesta.
Te cuento que descargue y mire los ejemplos del link que me sugeriste pero debo decirte que es demasiado para mi... muchas veces no aclaro que soy un autodidacta de access y que lo que voy logrando lo hago con mucha búsqueda, tutoriales y la ayuda de muchos de uds.
Los ejemplos eran maravillosos pero imposibles de ejecutar para mi ya que no sabía que extraer de tanto código para lo que yo necesitaba y fracase en todos los intentos.
Seguí hasta ahora buscando sin parar y llegue a un video en youtube donde se explicaba bastante mas sencillo y lo seguí al pie de la letra pero me encuentro estancado ya que me da un error y quisiera saber si alguien tiene una idea de por que puede ser.
Antes que nada te cuento que mi ribbon esta creada y carga perfectamente.
La ribbon tiene un botón "Comprobantes" que quiero que se habilita o inhabilite de acuerdo a un dato del formulario.
Te cuento que llegue a esto...
--------------------------------------
en XML referencio en onLoad mi modulo
--------------------------------------
<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui" onLoad="mdl_ribbon.estadoboton">
------------------------------------------
en XML referencio en getEnabled mi modulo
------------------------------------------
<button id="btn_caja_02_0501" supertip="****" label="Comprobantes" getEnabled="mdl_ribbon.activardesactivarboton" onAction="funciones" />
--------------------------
y mi modulo se compone asi
--------------------------
Option Compare Database
Public MiRibbon As IRibbonUI
Public Sub estadoboton(ribbon As IRibbonUI)
Set MiRibbon = ribbon
End Sub
Public Sub activardesactivarboton(control As IRibbonControl, ByRef enabled)
If Forms!frm_caja_2!caja_gestion_id = 1 Then
enabled = False
Else
enabled = True
End If
End Sub
--------------------------------------------------------------------------------------------
luego en el formulario al que esta aplicada la Ribbon tengo un botón con este procedimiento
--------------------------------------------------------------------------------------------
Private Sub Comando1102_Click()
MiRibbon.InvalidateControl ("btn_caja_02_0501")
End Sub
Todo esto en el ejemplo que vi en la web aparentemente funcionaba pero en mi caso cuando hago click en el botón me aparece el siguiente error
------------------------------------------------
ERROR 91 en tiempo de ejecucion
Variable de objeto o bloque With no establecido
-----------------------------------------------
llevo lo que he tardado en responderte lidiando con esto y tratando de entender que es lo que hago mal pero fracasé en todos los intentos.
Alguna idea de que estoy haciendo mal... me asombra que el ejemplo que vi en la web (literalmente una clase de 30 minutos de ribbon XML esto funcionaba y a mi no me funciona)
Desde ya muchas gracias