Grapher 14 added the ability to create multi-page project files. However, all added pages are letter size with portrait orientation. If you wish to create a project with many pages, and you want all of your pages to be a custom size, you can use the script below to create the project, and then you can add content to each page. If you would like the pages to be a predefined page size, see How can I add pages to my Grapher project with a specific predefined page size?.
To run the script:
- Copy the script below.
- Open Grapher and turn on the Script Manager by clicking View | Display | Script Manager.
- Press Ctrl+A to select all of the existing lines in the Script Manager and then press DELETE.
- Press Ctrl+V to paste it into the Script Manager.
- Click the green arrow Start/Resume icon in the Script Manager.
Sub Main 'Initializes Grapher Dim Grapher As Object Set Grapher = CreateObject("Grapher.Application") Grapher.Visible = True '============================= 'User defined variables '============================= numpages = 3 outpath = "C:\temp\" outfilename = "Plot1.gpj" pwidth = 5 pheight = 6.1 '============================= 'Set up page 1 Set Plot1 = Grapher.Documents.Add(grfPlotDoc) Plot1.PageSetup.Width = pwidth Plot1.PageSetup.Height = pheight 'Add any additional pages and set them up For i=2 To numpages Plot1.AddPage("Page"+Str(i)) Plot1.PageSetup.Width = pwidth Plot1.PageSetup.Height = pheight Next 'Activate page 1 Plot1.SetActivePage(1) 'Save the file Plot1.SaveAs(outpath+outfilename,grfProject) End Sub
Please contact us if you would like us to add your vote to our suggestion file for the ability to set a default page size to use for added pages.
Updated February 2023
Please sign in to leave a comment.