topic Betreff: SelectOnScreen Win7-64bit with Version 2011 Acad. in VBA Forum

SelectOnScreen Win7-64bit with Version 2011 Acad.

fxcastil — Tue, 13 Sep 2011 22:53:50 GMT

Has anybody used the SelectOnScreen method of creating a selection set in AutoCAD 2011.

I have been using the same VBA code in version 2005-2008 without a problem, so I am guessing the problem is with

version 2011. This is the first time time to this VBA code in Win7-64 Bit with 2011 AutoCad.

Code snippet below

*********************************************

' the user is selecting text or Mtext from the screen

If strType = "Text" Then

   ReDim intFltrCode(3) As Integer
   ReDim varFltrVal(3) As Variant

      intFltrCode(0) = -4:   varFltrVal(0) = "<OR"
      intFltrCode(1) = 0:    varFltrVal(1) = "TEXT"
      intFltrCode(2) = 0:   varFltrVal(2) = "MTEXT"
      intFltrCode(3) = -4:   varFltrVal(3) = "OR>"

End If

' call selection set function which creates new selection set and erases old
     Set objSelSet = ChkSelSet(strSetName)


' Prompts the user to select entity from drawing based on filter

**************************** error is generated here ******************************************

objSelSet.SelectOnScreen intFltrCode, varFltrVal

Betreff: SelectOnScreen Win7-64bit with Version 2011 Acad.

Alfred.NESWADBA — Wed, 14 Sep 2011 06:15:28 GMT

Hi,

>> so I am guessing the problem is withversion 2011

Could you please tell us, what problem you do have? What error-message, at least the number?

I tried this code with AutoCAD 2011x64 (on Win7x64):

   Dim intFltrCode(0) As Integer
   Dim varFltrVal(0) As Variant
   intFltrCode(0) = 0:   varFltrVal(0) = "TEXT,MTEXT"
         
   Dim objSelSet As AcadSelectionSet
   Set objSelSet = ThisDrawing.SelectionSets.Add("TSTSELSET")
   
   objSelSet.SelectOnScreen intFltrCode, varFltrVal

I did not built in the check, if a SelectionSet with this name does exist, so that has to built in.

I show how you can do an "OR"-filter without using "<OR" ..."OR>"

....and my code runs without exception. So I guess that the base of your problem is placed in that part of code you did not show (for example where the SelectionSet is created?

- alfred -

Betreff: SelectOnScreen Win7-64bit with Version 2011 Acad.

fxcastil — Thu, 15 Sep 2011 20:28:41 GMT

The error message is

Run Time Error '-2147418113

AUTOMATION ERROR

CATASTROPHIC FAILURE

Betreff: SelectOnScreen Win7-64bit with Version 2011 Acad.

Alfred.NESWADBA — Thu, 15 Sep 2011 20:34:04 GMT

Hi,

does my code run on your AutoCAD?

- alfred -

Betreff: SelectOnScreen Win7-64bit with Version 2011 Acad.

fxcastil — Fri, 16 Sep 2011 17:07:20 GMT

I get the same error with your code as well.

Are you using you sample code inside a user-form? In other words can you use a button-click to start your lines of code?

The problem seems to be be when using a user-form to allow the operator/user to start the SelectOnScreen method.

I have read other posts about the same problem I am having.