topic Re: Text and Block in One Table Cell in Visual LISP, AutoLISP and General Customization Forum

Text and Block in One Table Cell

DGCSCAD — Fri, 10 May 2024 19:56:52 GMT

I have a cell with text and a block, and when I select it and check it's properties (Ctrl+1) I'm seeing:

Content

Cell Type | Multi (greyed out/non-selectable)

Layout | Flow (selectable with options for Horz/Vert Stacked)

How would I set a cell to this (Multi) using LISP?

I know there's vla-SetCellType, which is either acBlockCell, acTextCell, or acUnknownCell, but that sets it to only one of those.

I've been combing through this and haven't found what I need:

http://entercad.ru/acadauto.en/

Re: Text and Block in One Table Cell

Sea-Haven — Sat, 11 May 2024 03:51:43 GMT

Post dwg need to look at it sounds like a merged cell.

Re: Text and Block in One Table Cell

komondormrex — Sat, 11 May 2024 06:25:28 GMT

in fact it is not.

Re: Text and Block in One Table Cell

komondormrex — Sat, 11 May 2024 06:48:30 GMT

check this

(setq table (vlax-ename->vla-object (car (entsel "\nPick your table: ")))) (setq b (vla-item (vla-get-blocks (vla-get-activedocument (vlax-get-acad-object))) "111")) ;getting the block record "111" (setq bid (vla-get-objectid b)) ;getting the block record "111" id (vla-setblocktablerecordId table 1 1 bid :vlax-true) ;inserting the block record "111" into the cell 1 1 with autofitting set to true (setq sid1 (vla-createcontent table 1 1 0)) ;creating content id for the cell 1 1 (vla-settextstring table 1 1 sid1 "Multi") ; adding text "Multi" to the text content of the cell 11

Re: Text and Block in One Table Cell

Sea-Haven — Sat, 11 May 2024 23:32:43 GMT

As I often say learn something new every day, knew about insert block into cells.

Just a comment needed to do (vla-put-regeneratetablesuppressed table :vlax-false) to see result, somewhere regenerate is turned off.

Re: Text and Block in One Table Cell

DGCSCAD — Mon, 13 May 2024 18:09:37 GMT

@komondormrex wrote:
check this

Thank you!

Not sure why it's not accepting formatting in the text string though.

Here's the end result of what I'm trying to accomplish:

The red outline (the cell border), and the green block are both colored just for explanation purposes, but the text needs to have everything bylayer except for the blue string in parenthesis. It needs to be blue.

The text string would be:

"NOTE:\\PTHIS LINE AND AND THEN THIS {\\C5;(BLUE STUFF)} SOME OTHER STUFF HERE."

It's formatted correctly in a text cell, but it seems to behave differently when it's a mixed cell.

Re: Text and Block in One Table Cell

komondormrex — Mon, 13 May 2024 19:43:40 GMT

dunno, it does for me.

Re: Text and Block in One Table Cell

DGCSCAD — Mon, 13 May 2024 19:57:45 GMT

Well... I guess I had something funky going on in my test string when ran it earlier. It's fully functional now. Thank you again, komondormrex.

Re: Text and Block in One Table Cell

dvertz — Mon, 19 May 2025 18:17:35 GMT

komondormrex,

Thank you for commenting the section ";inserting the block record "111" into the cell 1 1 with autofitting set to true"

The autofit part is just what I was looking for.

Re: Text and Block in One Table Cell

DGCSCAD — Thu, 09 Oct 2025 14:17:27 GMT

How would I retrieve the block name from a table cell?

Re: Text and Block in One Table Cell

DGCSCAD — Thu, 09 Oct 2025 14:47:17 GMT

Here's where I'm stuck:

Command: (setq IMG_name (vlax-invoke-method tbl_ename 'GetCellValue 5 4))
#<variant 0 >

Command: (setq IMG_name (vlax-invoke-method tbl_ename 'GetCellType 5 4))
2

Not sure what 'Get... to use, or do I have to dig deeper?

Re: Text and Block in One Table Cell

komondormrex — Thu, 09 Oct 2025 14:58:50 GMT

the following will retrieve block name from a table cell, row 1 column 3. where table is a table like in message 6.

(vla-get-name (vla-objectidtoobject (vla-get-activedocument (vlax-get-acad-object)) (itoa (vla-getblocktablerecordId table 1 3))))

Re: Text and Block in One Table Cell

dvertz — Thu, 09 Oct 2025 14:53:23 GMT

I was hoping someone would pop in and answer this for you. There are certainly people better at lisp than myself. But here's what I have. Code to set the block. Maybe it can help you come up the getting the block.

(vla-SetBlockTableRecordId VLA:ACTABLE INT:TBLROW 1 (vla-get-objectid (vla-item (vla-get-blocks VLA:ACTDOC) (vl-filename-base PATHFILENAME))) :vlax-true)

I know the command "vla-GetBlockTableRecordId" exists, but I have not used it.

Re: Text and Block in One Table Cell

DGCSCAD — Thu, 09 Oct 2025 15:13:11 GMT

@komondormrex

Once again, you've found the solution. I was way off. Thanks again!

@dvertz

Thank you! I appreciate any and all help I can get. 🙂

Re: Text and Block in One Table Cell

dvertz — Thu, 09 Oct 2025 15:18:09 GMT

komondormrex, Thanks for getting this for DGCSCAD.

I had the "vla-getblocktablerecordId". I had no clue about the "vla-objectidtoobject" part.

Re: Text and Block in One Table Cell

komondormrex — Thu, 09 Oct 2025 16:49:35 GMT

hey guys, you are much welcome!)

when it sets, it undeniably gets!