07-16-2020
05:05 AM
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
07-16-2020
05:05 AM
I forgot to enclose the name of the command in Quote marks. It should be like this:
Dim oSave As MsgBoxResult = MsgBox("File must be saved before making a drawing." & vbCrLf & _
"Save now?", vbYesNo + vbQuestion, "SAVE?")
If oSave = vbYes Then
ThisApplication.CommandManager.ControlDefinitions.Item("AppFileSaveAsCmd").Execute
End If
Wesley Crihfield
(Not an Autodesk Employee)