In questa discussione, più simile ad un monologo delirante che ad altro,
:-) avevo sollevato un sacco di polvere senza concludere niente...
Adesso vorrei chiudere l'argomento, prima di dimenticarmi tutto!
Innanzi tutto il Carlsten che citavo in realtà si chiama Carsten
Driesner... e la sua macro non funzionava perché scriveva gli shortcut
nell'accel.xml di Writer e non di Calc...
Per registrare la scorciatoia a livello globale vedi:
http://www.mail-archive.com/[email protected]/msg01732.html
(leggere tutta la discussione...viene spiegata la differenza fra Calc e
writer e come usare più modifiers combinati)
La macro in coda invece scrive lo scorciatoia nel documento e questa è
attiva solo in quel documento.
(Le scorciatoie scritte nel documento prevalgono su quelle impostate a
livello globale... )
Per puntare alla macro giusta è buona l'indicazione di Paolo Mantovani...
Registrarla con il normale sistema UI e poi andare a guardare nel file
accel.xml (del documento o delle impostazioni utente) e vedere come
viene scritta!
(Copia/incolla è ottimo...)
Per cancellare uno schortcut
A livello globale la solita UI standard.
A livello del documento non ho capito come fare...
Salvo modificare direttamente a manina il file accel.xlm (funziona!)
Fine!
Visto l'entusiasmo suscitato dall'argomento non credo sia il caso di
scrivere qualcosa si wiki...
Saluti
Bart
---------------------------------------------------------------
Sub PROVA_TASTIERA ' registra Ctrl-h a livello del documento
' ovvero la scorciatoia è attiva solo nel documento
Dim aKeyEvent As New com.sun.star.awt.KeyEvent
with aKeyEvent
. modifiers = com.sun.star.awt.KeyModifier.MOD1 'Ctrl
. KeyCode = com.sun.star.awt.Key.H
End with
UIcfgMgr = thisComponent.UIConfigurationManager
shortCuts = UicfgMgr.ShortCutManager
shortCuts.setKeyEvent(aKeyEvent,"macro:///Standard.Module1.Test8")
shortCuts.store()
end sub
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
