#1
|
|||
|
|||
Is there a way to standardise the size of images when doing a mailmerge?
Hi,
I can't find the answer when I search in Google and in this forum - perhaps someone else has found a solution to this problem. In this instance the users have to screenshot a Nearmaps image for solar panel placements then upload the image into a form which then gets merged in a Word template. The problem is that each user screenshots at different screen resolutions resulting in images of varying sizes. I've already constrained the inbound images by setting a fixed table to deal with very large images that the user has screenshotted, but getting smaller image sizes to maximise to the table width so that they fill the table width is the unknown. Does anyone know how to increase an inbound image size when it comes into the document so that it fills the table? The end result we after is for all images to be the same size in the produced quote. Thanks, Andre |
#2
|
||||
|
||||
There is no built-in facility for enlarging undersize images to fit a table. The following macro added to your mailmerge main document will address that for merges to new documents:
Code:
Sub MailMergeToDoc() Application.ScreenUpdating = False Dim Tbl As Table, iShp As InlineShape ActiveDocument.MailMerge.Execute For Each Tbl In ActiveDocument.Tables With Tbl.Range For Each iShp In .InlineShapes With iShp .LockAspectRatio = True With .Range.Cells(1) If .Height <> iShp.Height Then If .Width <> iShp.Width Then iShp.Height = .Height If iShp.Width > .Width Then iShp.Width = .Width End If End If End If End With End With Next End With Next End Sub
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
#3
|
||||
|
||||
FWIW if you use the following to run the merge, you can include the macro at merge time, though if using Paul's macro it would require a minor change to be compatible (see below)
https://www.gmayor.com/MergeAndSplit.htm Code:
Sub FixImages(oDoc As Document) Application.ScreenUpdating = False Dim Tbl As Table, iShp As InlineShape For Each Tbl In oDoc.Tables With Tbl.Range For Each iShp In .InlineShapes With iShp .LockAspectRatio = True With .Range.Cells(1) If .Height <> iShp.Height Then If .Width <> iShp.Width Then iShp.Height = .Height If iShp.Width > .Width Then iShp.Width = .Width End If End If End If End With End With Next End With Next End Sub
__________________
Graham Mayor - MS MVP (Word) (2002-2019) Visit my web site for more programming tips and ready made processes www.gmayor.com |
#4
|
||||
|
||||
By naming the macro 'MailMergeToDoc', it already intercepts the process initiated by Word's 'Edit Individual Documents' button. It is also easily worked into the Merge_To_Individual_Files macro under the Send Mailmerge Output to Individual Files topic in the Mailmerge Tips & Tricks 'Sticky' thread at the top of this forum: https://www.msofficeforums.com/mail-...ps-tricks.html
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
#5
|
|||
|
|||
Thanks guys, looks like macros are blocked by their server. I managed to find another way around the size issue.
One thing that helped us and found by chance is that while an image is merged in a table cell as is, when merged into a Text Box, the image can be manipulated to some extent by sizing the text box to only show the parts of the merged image that you want. In our case the image had to include a specific ratio for it to be sized correctly, so we create the image with the correct ratio then use the Text Box size to crop the extra white space that we don't need shown in the final PDf. This may help someone else that is battling with merged images in table cells or help them to come up with another idea with this info. Thanks again! |
#6
|
||||
|
||||
You can do something similar with tables by manipulating the paragraph before/after spacing and setting the left and/or right margins outside the cell boundaries.
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
Tags |
image adjustments, size content |
|
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
size of imported images ??? | yvessr | Drawing and Graphics | 14 | 05-04-2019 07:46 AM |
Font size change after mailmerge (labels) | Ludo_S | Mail Merge | 3 | 05-02-2016 02:34 PM |
Mailmerge is enlarging the size of the email | Joan | Mail Merge | 2 | 10-27-2014 05:16 PM |
Standardise repeated actions | TiVivibi | PowerPoint | 0 | 10-10-2014 02:06 PM |
has anyone had any success using dynamic images in Mailmerge? | bakhesh | Mail Merge | 1 | 09-29-2013 08:05 PM |