Private Sub RunCommandExample()
' This example demonstrates using the RunCommand method to draw a line.
RunCommand "Line"
Me.hide
Application.ActiveWindow.Visible = True
End Sub