OLE

Exemple simple

Voici la manière d'insérer un dessin .BMP en tant qu'objet lié dans un champ défini dans la table comme étant un objet OLE :

Me![AbonnementValidite].SourceDoc = "AbonnementOK.bmp"

Me![AbonnementValidite].Action = acOLECreateLink ' Crée l'objet lié.

Exemple complet

Cet exemple crée totalement un lien avec un genre de fichier, en l'occurence Excel, et définit tout ce qu'il faut définir pour afficher la bonne feuille, avec la bonne plage :

OLE1.Class = "Excel.Sheet"

Définit le nom de classe.

OLE1.OLETypeAllowed = acOLELinked

Spécifie le type d'objet

OLE1.SourceDoc = "D:\Atelier\Test.xls"

Spécifie le fichier source.

OLE1.SourceItem = "L1C1:L5C5"

Spécifie les données avec lesquelles créer le lien.

OLE1.Action = acOLECreateLink

Crée l'objet lié.

OLE1.SizeMode = acOLESizeZoom

Ajuste la taille du contrôle.