Click to See Complete Forum and Search --> : How can I write TIFF files to Microsoft Word through VB 6


Xorphitus
July 12th, 2000, 01:34 PM
Hey all, this is my first post here on the board, and I am posting here to see if i can get some help with a project I am working on. My problem is as follows: I need to create a Microsoft word document (which I can do), through visual basic 6.0. After making a new document, I need to insert graphics (pictures in TIF form) underneath text that displays its name, and filepath.
For example, the picture "Picture_01" would look like...

Picture_01 c:\pictures\picture_01
**********pic**********************

As it stands now, I can write the text into the document, but the program places the pictures stacked on top of each other, instead of begining with the next text and then the next picture. Ideally i want this to be the format:

picture_01 c:\pictures\picture_01
*************pic******************
Picture_02 c:\pictures\picture_02
*************pic******************
etc...

objWD.Selection.TypeParagraph


This is the code the macro editor generated, but it doesnt work, it writes the text ok but pastes the pictures on top of each other:

ActiveDocument.Shapes.AddPicture Anchor:=Selection.Range, FileName:= _
"\\HYDE\c\Development\Practicum\Screens\" &strFilename,LinkToFile:=False,_
SaveWithDocument:=True
objWD.Selection.TypeParagraph

I would appreciate any help I can get, thanks for your time.