VB et les SSActiveToolBars (Sheridan suite)...

Question

salut,

bien que ça paraisse tt con, je n'arrive pas à lancer au sein d'une Sub SSActiveToolBars1_ToolClick(ByVal Tool As ActiveToolBars.SSTool) l'appel à un autre bouton de ma toolbar ;
en fait, qd je clic sur BTN1, je veux executer certaines choses, puis exécuter le code du clic sur BTN2...or, je ne trouve pas ce qui identifie le TOOL du paramètre de l'évènement ToolClick => j'ai essayé avec l'ID et le Nom du bouton, ça ce fonctionne pas (ne compile même pas !).

Ds l'aide Sheridan, il précise que TOOL est une référence au bouton voulu...oui, mais quelle est cette référence ?! ;o)

D'avance merci de votre aide !
A+

cs_xavier77 · Answer

La valeur de ID est définie lorsque tu fais un click droit puis configurer sur le TollBar dans la Form. 
Exemple avec deux boutons : Enregistrer et quitter
Private Sub TB_ToolClick(ByVal Tool As ActiveToolBars.SSTool)
   Select Case Tool.ID
        Case "ID_Enregistrer"
            Call Valider

        Case "ID_Quitter"
            Unload me
    End Select
End Sub

@+

VB et les SSActiveToolBars (Sheridan suite)...

1 réponse

Discussions similaires