How can I use a Grapher script to rename my object?

This article contains a sample script for renaming a graph via automation.

To run this script:

  1. Click here to download the BAS file: RenameObject.BAS.
  2. Click Automation | Scripts | Run, select the BAS file from your downloads directory, and click Open.

OR:

  1. Copy the script below.
  2. Open Grapher and turn on the Script Manager by clicking View | Display | Script Manager.
  3. Press Ctrl+A to select all of the existing lines in the Script Manager and then press DELETE.
  4. Press Ctrl+V to paste it into the Script Manager.
  5. Click the Start/Resume icon (StartButton.png) in the Script Manager. 

 

*********

Sub Main

Dim GrapherApp As Object
Set GrapherApp = CreateObject("Grapher.Application")
GrapherApp.Visible = True

Dim Docs
Set Docs = GrapherApp.Documents(1)
Dim Plot As Object
Set Plot = Docs.Shapes

'Renames the first object "Test" Plot.Item(1).Name="Test" End Sub

 

Updated October 18, 2018

 

Was this article helpful?
1 out of 1 found this helpful

Comments

0 comments

Please sign in to leave a comment.