Créer dynamiquement un ActiveX sur un formulaire

**gbuxo** · 16/04/2006, 06h37

Bonjour,
Je voudrais créer un ActiveX (image) sur un formulaire (en Access97).
Je pense que le code de création est :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Dim fimg As Object
Set fimg = CreateObject("Forms.Image.1")

Mais pour placer l'objet sur le formulaire ???????
Peut-on déjà lui passer des paramètres style :
fimg.Left = .....
fimg.Top = .....
J'ai déjà fais ça sous d'autres languages mais pas en VBA.
Merci

**gbuxo** · 19/04/2006, 18h54

Salut,
Je n'ai jamais utilisé d'ActiveX en VBA, alors si j'ai posé une question stupide j'accepte que la honte me tombe dessus......
A+ Merci

**LedZeppII** · 19/04/2006, 22h56

Bonsoir,
Tu peux peut-être essayer ceci:
En mode création sur le formulaire, tu cliques dans la barre d'outils sur le bouton représentant un marteau et un tournevis, souligné par trois petits points. Cela devrait lister les contrôles ActiveX disponibles.
Tu choisis celui qui t'intéresse et tu le places sur le formulaire.
La référence à la bibliothèque de l'objet s'ajoute toute seule.
Ensuite tu ajustes ses propriétés par VBA.
Example:
Sur formulaire un j'ai placé un contrôle ActiveX "DHTML Edit Control Safe for Scripting for IE5"
Dans l'évênement sur Ouverture du formulaire j'ai mis ce code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Private Sub Form_Open(Cancel As Integer)
Dim CtlAx As DHTMLEDLib.DHTMLSafe

' Le contrôle inséré dans le formulaire s'appelle CtlActiveX6
Set CtlAx = Me.Controls("CtlActiveX6").Object
CtlAx.DocumentHTML = "<html><head></head><body>" & _
 "<IMG SRC=http://www.developpez.net/forums/ima...orum_new.gif>" & _
 "</body></html>"

End Sub

A+

**gbuxo** · 19/04/2006, 23h55

Salut,
Merci pour ta réponse, mais ce que je veux faire c'est créer l'ActiveX par programmation.... et non manuellement......J'ai eus beau fouillé les FAQ, je n'ai rien trouvé.
A+

**LedZeppII** · 20/04/2006, 10h00

Bonjour,

Ok, dans ce cas là regardes la fonction CreateControl dans l'aide d'Acces.
Par contre il faut que le formulaire soit ouvert en mode création.
Je ne suis pas sûr que l'on puisse ajouter dynamiquement un contrôle dans un formulaire Access ouvert en mode Visualisation, la collection Controls n'ayant pas de méthode pour en ajouter/enlever.
A+

**gbuxo** · 20/04/2006, 11h52

J'ai déjà essayé CreateControl, mais ce n'est pas pour les ActiveX. Il faut utiliser CreateObject, mais qui ne me crée apparement rien sur le formulaire (en mode création bien sur).....je creuse.......
A+

Créer dynamiquement un ActiveX sur un formulaire

IHM

Vue hybride

Discussions similaires

Partager

Partager