EBDN - Community - Question & Answers

  Friday, 24 March 2017
  2 Replies
  1.2K Visits
0
Votes
Undo
Sir,
Thanks for Reply.

For Advance CAD Import the Source name is Run

But When I use program as below,

Public Sub Call1_Click()
Dim oFirstDrg As Drawing
Dim colFounds As ObjectItem
Dim ActiveProject As Project
Set ActiveProject = Application.Folders.Projects.Children("Standard";)
ActiveProjectnm = ActiveProject.Name
Set oFirstDrg = ActiveProject.DrawingsFolder.Children("D1";)
Call Application.Utils.RunMacro("AdvancedCADImport.Wizard.Run", oFirstDrg)
Unload Me

In this case the Source name for Advanced CAD Import is 'Run'. I have used it but when I execute the program I get Run time error 2147194545(8004694f) 'Error with execution of Macro or Wizard".

Pl let me know where I am going wrong.