The Visual Basic for Applications (VBA) engine is no longer provided with your AutoCAD OEM installation media. Please contact your Autodesk ISV partner representative for more information. * Includes the Autodesk Genuine Service which tests for certain types of non-genuine Autodesk software. Mar 25, 2011 - I then tried to amend this so it extracted X,Y,Z data from 3D polylines using. I'm fairly new to vba so assume I've made a fundamantal error.

Hi Terry, if you have a repeatable issue, then I would raise a Support Request including sample code. That way if it proves to be a bug it can be fixed. Vba is deprecated, and is no longer supported by Microsoft. Vba started out on a 32bit platform, so I believe getting it to run on 64bit presents some challenges. Assuming it does become available, you may need 64bit Excel to get the two applications to successfully communicate.

I think the general advice (in the longer term) is to look at moving your code to another language such as.net. I never set option base, and so I never declare an array such as dim pt( 9) which would make a 10 point array, I would do dim pt (1 to 10) or if I had to and know I had to dim pt(0 to 9) autocad addlightweightpolyline will take either one, bricsys will not.

The code I posted in the jpg, both examples run in autocad identical and bricsys results diverge as shown in the other jpg. Perhaps autocad intended the polyline method to be zero based and they forgot to check it, but the method does not care what the index values are as long as the array is an even number. I am sure of this. Here is an example I have to rewrite. Again, not a big deal, but a definite task Sub mbox(p1 As Double, p2 As Double, p3 As Double, p4 As Double, strlayer As String) Dim objent As AcadLWPolyline Dim pt(1 To 8) As Double pt(1) = p1: pt(2) = p2 pt(3) = p3: pt(4) = p2 pt(5) = p3: pt(6) = p4 pt(7) = p1: pt(8) = p4 Set objent = acadDoc.ModelSpace.AddLightWeightPolyline(pt) objent.Closed = True objent.layer = strlayer End Sub.

Hi everybody, for the first time I'm using VBA with autocad on dwg files. I found on internet a piece of code that is exactly what I was looking for. Protokoli iluminata. This sub get all the polylines in the file and extract attributes values from the blocks that stay within each polyline. The fact is that the code works only with polylines with a few vertexes, doesn't work with complex lines because it doesn't get the blocks ('Etichetta Locale') staying inside the poly area. Any ideas how to fix it? Thanx in advance.

Hi everybody, for the first time I'm using VBA with autocad on dwg files. I found on internet a piece of code that is exactly what I was looking for. This sub get all the polylines in the file and extract attributes values from the blocks that stay within each polyline. The fact is that the code works only with polylines with a few vertexes, doesn't work with complex lines because it doesn't get the blocks ('Etichetta Locale') staying inside the poly area. Any ideas how to fix it? Thanx in advance.

Fixo, your code works. The problem I'm facing is that I'm calling the sub from excel, and from excel I can't see the ThisDrawing Object. I tried changing 'ThisDrawing' with 'ActiveDocument'. In this case it doesn't work, running the code both in autocad as in excel.

How is it possible???? Is there any way to use the ThisDrawing Object from Excel? Which library the object belongs to? Hi, Ale Change Thisdrawing on AcApp.ActivedDocument like it is in your first post Let me know if it's not working as well. It's driving me crazy. Sadi gali aaja nautanki saala mp3 ringtone download hindi.