referencing Bricscad application object
I am modifying a VBA program in Excel for use with Bricscad 8 instead of Autocad. I am having problems with the 'Set ac = GetObject(, "AutoCAD.Application")' line. What should be used in place of "AutoCAD.Application"?Option ExplicitPublic ac As AcadApplication, acms As AcadModelSpace, _ acArc As AcadArc, acLayer As AcadLayer, acLine As AcadLine, acMText As AcadMText, _ acPLine As AcadLWPolyline, acPoint As AcadPoint, acss As AcadSelectionSet, acText As AcadTextPublic gc As Double, pi As DoublePublic dCarrSp As Double, dClosure As Double, dGnd() As Double, dSnow() As DoublePublic iConfig As Integer, iPPC As Integer, iU2D As IntegerPublic sAnalysis As String, sGndTxt() As String, sGrip As String, sInclUnits As String, sModel As String, sUnits As StringSub Profile()Application.ScreenUpdating = Range("bScreenUp").ValueCall SetPublic 'set public variablesCall UpdateFunctions 'reset functionsIf Range("bDrawPro").Value Then 'set the application Set ac = GetObject(, "AutoCAD.Application") Set acms = ac.ActiveDocument.ModelSpace Call SysVars
Comments
-
Check Knowledge Base item 8
0 -
The knowledgebase is by search term only now, on the 'new look' website. What search term did you use?
0 -
Just do a search with no search phrase and it will list all the items.
0 -
This is how to reference the application object: GetObject(, "BricscadApp.AcadApplication")The related knowledgebase item is titled "How to create a reference to the Application object in COM" and can be found using this URL: http://www.bricsys.com/common/knowledge/topic.jsp?id=196Kind regards
0 -
I just search "V8". Seems to whittle it down to just items relevant to Ver8, which are too numerous to peruse.Jerry
0 -
Thanks, all!
0