Thread: Createing Macro to Increase Margin by 1pt
View Single Post
 
Old 01-29-2014, 11:40 AM
thundercats9595 thundercats9595 is offline Windows 7 64bit Office 2010 64bit
Novice
  
Join Date: Jan 2014
Posts: 7
thundercats9595 is on a distinguished road
Default Createing Macro to Increase Margin by 1pt
I am a beginner when it comes to VBA. Trying to create a macro that will increase the top margin by 1pt.

I have tried the below. Im not sure how to increase the value of the current margin setting. Any assistance would be greatly appreciated.
Thank you.

Code:
 
Sub MarginMove1()
 
   With ActiveDocument.PageSetup
        .TopMargin = InchesToPoints("" + 1)
 
 
        End With
End Sub
Reply With Quote