Font and Page setup

[vnk]

Hi Everyone,

Am back again with font & page setup problem .

I have recorded the macro to modify the page setup for whole document and font size(except for tables) and when I tried to use them in the script it was giving an error.
I have included following lines in my script,
(e.g)

With ActiveDocument.PageSetup

.LeftMargin = InchesToPoints(1)
.RightMargin = InchesToPoints(1)

End With

am I missing any thing?

 

[acron]

What error mesage are you getting ?

The code you posted sets the active document margins, left & right, to one inch.

AC

 

[vnk]

Ac,

When I run the script it gives a pop up message
"Run time error 4608"
Value out of range

When I click the debug button , it points to the
".LeftMargin = InchesToPoints(1)"

- VNK