@Alex ha scritto:
PEr la QAT, pro va a leggere questi:
https://bytes.com/topic/access/answers/966701-how-remove-quick-access-toolbar-access-application
https://social.msdn.microsoft.com/Forums/office/en-US/ad3dea0b-c18e-47c5-afcc-f700ab5bb99c/disable-qat-in-access-2010-without-removing-custom-ribbon?forum=accessdev
Mostra l'XML che hai usato... perchè hai usato il Campo [RibbonXml] di un Record della Tabella [USysRibbons] vero...?
Si si verissimo :
1-Ho creato la tabella USysRibbons campi ID, RibbonName, RibbonXml
2-Ho creato le public sub da richiamare esempio di una..
Public Sub RibbonStampaImmediata(ctrl As IRibbonControl)
Dim LogUtente, PcNome, Evento As String
LogUtente = Environ("username")
LogUtente = Replace(LogUtente, ".", "_")
PcNome = Environ("computername")
'Accoda Evento
Evento = "Stampa Report"
strSQL = "INSERT INTO tbl_LOG ( Evento, Utente, Quando, NomePC )VALUES( '" & Evento & "',' " & LogUtente & "','" & Now & "',' " & PcNome & "');"
CurrentProject.Connection.Execute strSQL
'Stampa immediata
DoCmd.PrintOut
End Sub
3- ho creato il mio primo ribbon xml (lo carico in foto allegata che fa schifo... il forum continua a bloccarmi NON riesco a caricare il codice) Ho caricato il file txt con il codice del ribbon da scaricare
https://ufile.io/8445
<qat> </qat> l'ho messo seguendo un esempio ora guardo i tuoi link
supertip l'ho messo per vedere cosa effettivamente faceva ma nel mio caso potrebbe essere tranquillamente omesso
4-ho richiamato il mioribbon nel report ne "nome barra multifunzione"
Spero di non aver fatto grosse c....te ...
Allora tutto funziona correttamente a livello di codice nel senso che sono riuscito a fare quello che mi ero prefissato ed ho ottenuto il risultato voluto. Tranne quella fastidiosissima etichetta.
Penso e sono sicuro che sia tutto nettamente migliorabile...
Allegati: