Ribbon che non funziona perchè?????

Question

In un DB ho inserito la tabella UsysRibbons.

Il tag CustomUI ha due chiamate di callbacks onRibbonLoad ed onLoadImage:

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

In un modulo ho inserito il codice

Dim globalRibbon As IRibbonUI

Public Sub onRibbonLoad(Ribbon As IRibbonUI)

    Set globalRibbon = Ribbon

End Sub

Ma all'avvio del db mi appare sempre l'avviso

Verifica che la macro o la funzione esista e che i parametri siano corretti.

e naturalmente non funziona. Perchè?????

Answer 1

Hai provato a compilare (Debug->Compila).

Verifica le librerie (Strumenti->Riferimenti)

Mimmo

Answer 2

Ciao Mimmo,

la dichiarazione Global è sostanzialmente identica a Public e mantenuta per compatibilità con il passato. Ti riporto un estratto di questa pagina: What is the difference between Dim, Global, Public, and Private as Modular Field Access Modifiers?

Public and Globalare nearly identical in their function, however Global can only be used in standard modules, whereas Public can be used in all contexts (modules, classes, controls, forms etc.) Global comes from older versions of VB and was likely kept for backwards compatibility, but has been wholly superseded by Public

David

Answer 3

Grazie Mimmo

Purtroppo l'errore permane.

Sia con Public che Global

La cosa bella è che la stessa cosa in un altro db funziona.

Non capisco quale possa essere il problema

Answer 4

Ciao Pino e David,

forse meglio ancora sarebbe

Global globalRibbon As IRibbonUI

nel caso debba referenziare la ribbon  da altri moduli (per es. invalidare controlli).

Ciao Mimmo

Answer 5

Ciao Pino

prova a cambiare l'istruzione 

Dim globalRibbon As IRibbonUI

---

In

---

Public globalRibbon As IRibbonUI

David