Ribbon personalizzata

Question

Salve. Ho creato una Ribbon personalizzata, che in un'applicazione di prova funziona alla perfezione.

Quando però la inserisco nell'applicazione effettiva non funziona. O meglio, le istruzioni che "costruiscono" la ribbon funzionano alla perfezione, creo i pulsanti con tutta la loro grafica carina, però quando ci clicco su invece di aprire i form che dovrebbero essere aperti compare il messaggio di errore seguente: "

Microsoft Office Access: impossibile eseguire la macro o la funzione di richiamata 'MyButtonCallbackOnAction'

Assicurarsi che la macro o la funzione esista e che i parametri siano corretti"

Si consideri che: ho aggiunto la libreria Microsoft Office 12.0 Object Library, ho inizializzato la variabile IribbonControl come control, ho creato, nel modulo, le funzioni Public che aprono le maschere e che vengono richiamate dalla " MyButtonCallbackOnAction(control As IRibbonControl) ".

Si consideri anche che, prima di creare la Ribbon, le maschere si aprivano perfettamente cliccando sui pulsanti di una maschera di menù.

Non so più cosa provare.

Chiedo suggerimenti.

Grazie

Answer 1

ciao GioCalo,

qui, il tuo Db modificato per fare girare la parte del problema che segnali :

http://1drv.ms/1Mmb2Et PPKZ.accdb.

Facci sapere.

Ciao, Sandro.

Answer 2

Ho caricato una forma molto ristretta del db qui

https://onedrive.live.com/redir?resid=D3386BA60286A39!107&authkey=!AI1NVIecQjEKl98&ithint=folder%2caccdb

Ho caricato anche il testo del codice xml che ho usato

Adesso provo a modificare il codice come hai detto e vedo cosa succede

(grazie mille....)

Answer 3

La prima riga della tua Ribbon dovrebbe essere qualcosa di simile a:

<customUI xmlns="http://schemas.microsoft.com/office/2009/07/customui" onLoad="onCaricaRibbon">

onCaricaRibbon è il nome che io ho assegnato alla routine che mi fornisce il riferimento alla Ribbon tramite la Sub :

Public Sub onCaricaRibbon(theRibbon As IRibbonUI)

    Set myRibbon = theRibbon

End Sub

Mimmo

Answer 4

Questa routine in effetti non ce l'ho. La devo inserire sul load del form?

Proverò a fare l'estrazione del db appena possibile.

Grazie

Answer 5

Ciao GioCalo,

sembra come se ti fossi dimenticato qualche routine, ad esempio l'iniziale: OnLoad:

Public Sub onCaricaRibbon(theRibbon As IRibbonUI)

    Set myRibbon = theRibbon

End Sub

Puoi creare un estratto del tuo DB, epurato da eventuali dati sensibili, e condividerlo ad es. su OneDrive pubblicando qui il link generato?

Mimmo