I am inserting an image into a table in a word document.
As it stands only the very bottom of the image is visible, a narrow band at the bottom.
I can manually change the image to wrap text (any option) brings the image into view and all looks good.
Only i will be doing this with 6 images per document and there will be 100's of these documents a weeks so automating this is critical.
If x = 1 Then word_app.Activedocument.Tables.Item(3).Cell(4, 1).Range.InlineShapes.AddPicture ImageKey, False, True
"ImageKey" is the location of the image i am inserting.
The following don't work
1:) word_app.Activedocument.Tables.Item(3).Cell(4, 1).Range.Paragraphs.WordWrap = True 2:) word_app.Activedocument.Tables.Item(3).Cell(4, 2).Range.InlineShapes(1).Range.Paragraphs.WordWrap = True 3:) word_app.Activedocument.Tables(3).Columns(1).Cells(3).Range.ParagraphFormat.TextboxTightWrap = wdTightAll 3b...:)/>/> all option on the above right hand side of the "="
I have performed a macro and read the VBA and still have no luck. I want to do this in VB6 and not a VBA macro once don't. That's more of a work around than a solution.
Has anyone experience on this?