!! URGENT !! Inserer un doc excel dans un champ

Marsh Posté le 01-07-2002 à 11:46:43

Voila le soucis.

J'ai une table dans laquelle j'ai un champ de type OLE. Je veux y mettre dedans un document excel (ou word enfin peut importe). Je desire l'inserer dans le champ sans etre obligé de passer par un composant visuel d'un formulaire, c'est a dire entierement par code.
Voila le code que j'ai :

Set lAppExcel = New Excel.Application
lAppExcel.Visible = True
Set lDocExcel = lAppExcel.Workbooks.Add
Set lFeuilleExcel = lDocExcel.Worksheets(1)
lFeuilleExcel.Cells(1, 1) = "Utilisateurs connectés à " & lRecordSet.Fields("Sit_Nom" ).Value
For llIndice = 1 To tabRes(0)
lFeuilleExcel.Cells(llIndice + 1, 1) = tabRes(llIndice)
Next

J'avais pensé à faire comme ca par la suite mais bien sur ca marche pas.

lRecordSet.Edit
lRecordSet.Fields("Cont_Sit_Resultat" ).Value = lDocExcel.Sheets(1)
lRecordSet.Update

L'idéal serait de ne pas avoir a passer par un fichier externe, et surtout de ne pas passer par un objet visuel (OLE dependant) représentant le champ, mais passer directement par mon recordset.

Est-ce que quelqu'un a déja fait ca ? Comment faut il faire ?

Message édité par Bouil le 05-07-2002 à 22:07:47

---------------
La seule certitude que j'ai, c'est d'être dans le doute.

Marsh Posté le 01-07-2002 à 11:46:43

Marsh Posté le 02-07-2002 à 16:12:57

Personne pour m'aider ? Peut etre ai je mal explqué mon probleme... C'est assez urgent et je commence à en avoir ma claque de VB Access. :fou: :pt1cable:

---------------
La seule certitude que j'ai, c'est d'être dans le doute.

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed

Name *

Email *

URL

Message *