09-27-2018
01:42 PM
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
09-27-2018
01:42 PM
Okay I got the check right,
' Get the Active part document.
Dim ThisDoc As Inventor.Document
Set ThisDoc = invApp.ActiveDocument
If ThisDoc.DocumentType = DocumentTypeEnum.kDrawingDocumentObject Then 'Check if user is in a drawing document
GoTo 100
Else
o = MsgBox("I would recommend only using the AUTOSAVE macro in drawing documents. Would you like to ignore this warning?", "Caution", MessageBoxButtons.YesNo)
If o = vbYes Then
MsgBox "Good Luck..."
GoTo 100
Else
MsgBox "Good Choice!"
GoTo 102
End If
End Ifbut I think I need to "Dim" and "Set" my MsgBox.
Not sure what to Dim o as though