Je pars du principe que :
- Tu as un bouton nommé "BtnEq" sur ton formulaire.
- C'est sur ce bouton qu'on va cliquer pour venir saisir une equation dans le controle ole
- Que ce controle OLE se nomme "Eq"
- Que ce controle est accessible en modification, donc les propriétés Locked/Verrouillé = False/Non et Enable/Activé = True/Oui
Sur Click du bouton, tu mets ce bout de code :
Citation :
Private Sub BtnEq_Click()
Eq.Action = acOLECreateEmbed
Eq.Class = "Equation.3"
Eq.OLETypeAllowed = acOLEEither
Eq.Action = acOLEActivate
End Sub
|
Quand tu cliqueras sur le bouton, il va inserer dans le controle ole une equation, et te faire apparaitre la barre pour la saisir.
C'est bien entendu à adapter avec le nom des controles de ton formulaire.
Cordialement
---------------
Soyez malin, louez entre voisins !