Batch Insert Pictures into Word Table with Stored Information

macropod · #1 07-15-2025, 03:58 PM

Quote:

Originally Posted by mrhurley

One question as I try to understand the solution is the last line below:

With oTbl
With .Rows(x + 1)
.Height = Hght

"Hght" doesn't seem to be defined anywhere. Is this a universal variable or am I missing something.

It's defined at:
Sub FormatRows(oTbl As Table, x As Long, Hght As Single)

Quote:

Originally Posted by mrhurley

Also - is there a way to inside a page break after every fourth row so I always start a page with a caption row.

Inserting page breaks breaks the table into multiple separate tables and would require a significant re-write of the code. You should be able to achieve the same result by changing the TblPic Style's 'Keep With Next' attribute. To do that change:
.KeepWithNext = True
to
.KeepWithNext = False
and by inserting
.KeepWithNext = True
after:
.Range.Style = "Normal"
in the FormatRows sub.

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
How do I batch insert photos into individual table columns all at once?	wnembhard81	Drawing and Graphics	2	02-27-2024 10:29 AM
Insert multiple pictures at once in Word table	elias17	Word VBA	5	11-30-2022 09:39 AM
VBA coding to insert a word table using quickparts and insert table menu	Dont know	Word VBA	3	02-12-2020 09:51 AM
Mac - Macro insert pictures in table	Nina	Word VBA	16	08-27-2018 01:53 AM
Insert an article with pictures into a table cell	skatiemcb	Word Tables	2	01-24-2015 08:18 AM