![]() |
|
#1
|
||||
|
||||
![]()
It seems to me the problem is that you have specified a row height that is way too large. That said, you could change:
.Cells.VerticalAlignment = wdCellAlignVerticalCenter to: .Cells.VerticalAlignment = wdCellAlignVerticalBottom
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
#2
|
|||
|
|||
![]()
Hello, I've a workbook "Inspections.xlsx" with worksheet named "Observations" saved in C:\Users\ABC\Documents\. Photos are also saved at the same folder. I've changed the code like this
Code:
StrWkBkNm = "C:\Users\ABC\Documents\Inspections.xlsx" StrDocPath = ActiveDocument.Path StrRpt = Right(StrDocPath, Len(StrDocPath) - InStrRev(StrDocPath, "\")) StrWkSht = "Observations" StrPicPath = "C:\Users\ABC\Documents\" Code:
If .Name = "TblPic" Then bFnd = False: Exit For ![]() |
![]() |
|
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
![]() |
macaronipasta | Word VBA | 2 | 06-27-2021 06:28 PM |
Macro to access info from Excel spreadsheet and populate Word doc with text, photos, and captions | henhelm | Word VBA | 4 | 06-27-2019 08:49 PM |
![]() |
Mr M | Drawing and Graphics | 2 | 06-20-2018 08:07 PM |
![]() |
tha_slughy | Word VBA | 5 | 07-13-2014 04:39 PM |
![]() |
Jeremiahts | Drawing and Graphics | 1 | 03-23-2011 07:33 PM |