T
Ted
Hello
I am having a problem with the SaveAs method call. I have a VB form that has a OLE container that activates a Visio document. On this form is a button which makes a call to the method below. The problem is that nothing occurs with the SaveAs method call. I receive no error messages, nor a saved file. I've tested the reference and having no problems using it to modified the Visio document. Therefore, is it possible to use the SaveAs method with In-Place activation
Thanks
Te
Public Sub SaveVisioDoc(
On Error GoTo errorhandle
Dim MyVisio As Visio.Applicatio
'Obtain Visio Reference
Set MyVisio = DIT_Global_Variables.MyVisioRe
MyVisio.ActiveDocument.SaveAs "c:\temp\MyTestDrawing1.vsd
'Cleanu
Set MyVisio = Nothin
Exit Su
errorhandler
'Cleanu
Set MyVisio = Nothin
MsgBox "SaveVisioDoc: " & Err.Descriptio
End Sub
I am having a problem with the SaveAs method call. I have a VB form that has a OLE container that activates a Visio document. On this form is a button which makes a call to the method below. The problem is that nothing occurs with the SaveAs method call. I receive no error messages, nor a saved file. I've tested the reference and having no problems using it to modified the Visio document. Therefore, is it possible to use the SaveAs method with In-Place activation
Thanks
Te
Public Sub SaveVisioDoc(
On Error GoTo errorhandle
Dim MyVisio As Visio.Applicatio
'Obtain Visio Reference
Set MyVisio = DIT_Global_Variables.MyVisioRe
MyVisio.ActiveDocument.SaveAs "c:\temp\MyTestDrawing1.vsd
'Cleanu
Set MyVisio = Nothin
Exit Su
errorhandler
'Cleanu
Set MyVisio = Nothin
MsgBox "SaveVisioDoc: " & Err.Descriptio
End Sub