Hi Spirou,

Please go to the menu Help then select the "Developer Help" or "HelpDev" command to see the documents of IntelliCAD for the developer.

Regards,

Hi,
Please refer to the lisp routine that allows copying entities to the current layer.
If you know AutoLISP, you can modify it as you like.

Download here: https://www.dropbox.com/s/mi5w6is07ehq4 ... R.lsp?dl=0

Hi Steve, I use your SLN_PIPING lisp then try to replace your line (action_tile "s1" ;toggle Fitting options "(L1_ON)(L2_OFF)(L3_OFF)(L4_OFF)(L5_OFF) (L1_CLEAR)(L2_CLEAR)(L3_CLEAR)(L4_CLEAR)(L5_CLEAR) (RESET_LABELS)(RESET_DIMS)(RESET_LIST)" ); END ACTION TILE by this line (action...

Hi Steve,

On my PC, it works in both IntelliCAD 10.0 and 10.1

Hi ,

No, we cannot use an add-on for AutoCAD in the IntelliCAD.

It must be compiled using the IntelliCAD library.
You can get some sample projects in .NET here:
https://www.intellicadms.com/download/category/35-v10-1

Regards.

Hi,
Your code works as-is, please check your data file, maybe the value of cells in the excel file is invalid or empty.

Try to use this:
https://www.dropbox.com/s/caxtjfzgng65l ... .xlsm?dl=0

You can start with AddDimAligned: Sub DrawBorder() Dim icadApp As Object Dim icadDoc As Object Dim icadLibrary As Object Dim myPoints As Object Dim Shed As Object '****** Launch icad application**** On Error Resume Next Set icadApp = GetObject(, "icad.application") On Error GoTo 0 If icadA...

Hi,
Not sure for all compatible, but my PC upgrade to Windows 11 two weeks ago, works the same as Windows 10.
Regards.

Hi, Try this: Option Explicit Sub DrawRectange() Dim icadApp As Object Dim icadDoc As Object Dim iCadLibrary As Object Dim myPoints As Object Dim Rectangle As Object On Error Resume Next Set icadApp = GetObject(, "icad.application") On Error GoTo 0 If icadApp Is Nothing Then Set icadApp = ...

Hi, If you use VBA, please refer to this snippet: Extract all attributes to a text file: Public Sub AttOut() Dim SSetCol As SelectionSets Dim sset As SelectionSet Dim BlkInsert As BlockInsert Dim BlkAtts As Variant Set SSetCol = ActiveDocument.SelectionSets For Each sset In SSetCol If sset.Name = &q...

Hi Steven, I see if the length of the block name is larger than 32 characters, the block name will be truncated. Block Count ------------------------------------------- 12345678901234567890123456789... 1 12345678901234567890123456789012 1 WNRF_#2500_SCH_40_12-3DWNRF_#... 1 Regards,

Yes, the IntelliCAD doesn't have the command same as the "attout" to export attribute to file.

But you can use the lisp functions or VBA to extract the attribute and block handle/name ...

Hi,
This could be a starting point:
https://www.dropbox.com/s/4nozctsxzljmo ... t.lsp?dl=0
(sorry, can not post a lisp code here now)
Regards.

Hi,
Can you attach the lisp routine that has the issue?
Regards.

Please turn the TOGGLEPICKSTYLE on (Control + A).