One Click or Set Word Page Setting font margin header footer etc
Micro Kaise Enable Karte Hai
Sub ManualSetup()
ActiveDocument.PageSetup.PaperSize = wdPaperA4
ActiveDocument.Paragraphs(1).Range.Font.Name = "Arial"
ActiveDocument.Paragraphs(1).Range.Font.Size = 18
ActiveDocument.PageSetup.BottomMargin = InchesToPoints(0.4)
ActiveDocument.PageSetup.TopMargin = InchesToPoints(0.4)
ActiveDocument.PageSetup.LeftMargin = InchesToPoints(0.4)
ActiveDocument.PageSetup.RightMargin = InchesToPoints(0.4)
ActiveDocument.PageSetup.HeaderDistance = 0
ActiveDocument.PageSetup.FooterDistance = 0
End Sub
No comments:
Post a Comment
किसी भी प्रकार की समस्या य फिर किसी सुझाव देने के लिए यहा लिखे...