Originariamente inviato da luisa227
Uso vb5, prime armi, mi sono imbattuta nelle AddIn.
Sono riuscita, leggendo la guida in linea, a creare un’aggiunta che inserisce una voce nel menu Strumenti di Visual basic. (praticamente facendo Nuovo progetto /AddIn)
Se ho capito bene col riferimento ad Office (Private mcbMenu As Office.CommandBarControl) posso accedere al menu sia di VB che di altri programmi tipo Word o Excel, quindi posso estendere la mia addin anche ai programmi di Office.
La conferma l’ho avuta anche quando, pasticciando con VB, dal menu Progetto Inserisci progettazione ActiveX clicco su Classe AddIn e mi crea un file progettazione .Dsr: nella scheda General mi è possibile selezionare l’applicazione che voglio estendere. Ma poi con sto file non sono come proseguire…quindi vorrei proseguire sulla strada che ho iniziato.
Chi mi da delle dritte? Allego il codice che uso attualmente…come faccio a far comparire la voce nel menu Strumenti di Word? (o access o excel o outlook?) Devo forse fare delle aggiunte dal documento di Word? E come? Ho provato ma nulla! Help!
Implements IDTExtensibility
Public VBI As VBIDE.VBE
Private mcbMenuCommandBarCtrl As Office.CommandBarControl
Private WithEvents MenuHandler As CommandBarEvents
Private Sub IDTExtensibility_OnConnection(ByVal _
VBInst As Object, ByVal ConnectMode As _
VBIDE.vbext_ConnectMode, ByVal AddInInst As _
VBIDE.AddIn, custom() As Variant)
'MsgBox "L'aggiunta è ora collegata"
Set VBI = VBInst
Set mcbMenuCommandBarCtrl = VBI.CommandBars("Tools").Controls.Add(before:=3)
…
ect