Public Sub Save()
' This example saves the drawing.
Application.ActiveDocument.Save
End Sub
Document Object | Document Members