Help with OLE object addition and size in a report

[karemshen]

I want to ask two question
{Admin edit - This is not acceptable}
when we are adding an OLE Object in a form:
1. can we directly by pressing the button add a word document not giving a choice dialog box

[ADezii]

1. can we directly by pressing the button add a word document not giving a choice dialog box

Yes you can. As an example, to directly Embed the Word Document Test.docx into a Bound OLE Object Field on the Current Form, where Test.docx is in the same Folder as your DB:

With Me![txtOLE]
  .Class = "Word.Document"
  .OLETypeAllowed = acOLEEmbedded
  .SourceDoc = CurrentProject.Path & "\Test.docx"
  .Action = acOLECreateEmbed
End With

P.S. - If I'm not mistaken, Access does not control the Printing of Embedded Objects, the Server Application that created them does. If you are interested in simply Printing the Embedded Objects, then there is a work-a-round. You can store them as Binary Objects in an OLE Object Field, extract them on demand to a Temporary Folder, then Print them using the ShellExecute() API Function. Obviously, this is more complex approach that would require changing any existing Code.

[karemshen]

This code works if the ole object is just 1 and fixed
but in my case I have an ole object for every record in the database which may be 200 per year

[ADezii]

Are you saying that you have to dynamically add 200 OLE Objects to 200 Records of your Database? If this is the case, then you can probably expect your DB to get rather large, rather quickly.

[NeoPa]

I'm too late for this one so I need to remind all experts that posting multiple questions in a single thread is, for what I consider very obvious reasons, unacceptable.

I will remove the latter two questions and suggest that Karem should post them in separate threads individually should they be interested in getting help for them.