![]() |
#2
|
||||
|
||||
![]()
The relevant lines from your code is:
Code:
Sub Macro1() With Selection.PageSetup .PageWidth = CentimetersToPoints(21) .PageHeight = CentimetersToPoints(29.7) End With End Sub
__________________
Andrew Lockton Chrysalis Design, Melbourne Australia |
Thread Tools | |
Display Modes | |
|
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
Custom page size - Page color not covering entire page when converting to PDF | icor1031 | Word | 9 | 12-09-2019 08:21 PM |
Change page size reducing both margins | WizardDani | Word | 1 | 01-04-2018 06:41 AM |
![]() |
Ron Wolpa | Word | 4 | 08-18-2016 06:43 PM |
![]() |
tyger330 | Word | 9 | 12-19-2012 07:50 AM |
![]() |
kkepo | Word | 4 | 08-28-2012 08:53 PM |