Saves the document.
SVB Example
Saving a backup of a graph:
Option Base 1
Option Explicit
Sub Main
Dim g As Graph
Set g = ActiveGraph
Dim DirPath As String
DirPath = g.Path
'save a backup copy of the graph in the
'same directory
G.SaveAs(DirPath & r.Name & ".bak")
End Sub