cell heights in tables

[masterfal]

Hi all,

after importing text from an excel spreadsheet into a table in autocad i find i always need to adjust my cell heights as they all seem to change to various random heights. to fix i always need to click on table, highlight the affected cells (which is nearly always all of them) then go to properties and specify cell height for all. i was wondering if there was a lisp routine or something that could quickly change the cell heights of a selected table to a specified height? i always need to change height to 350 so if anyone knows anything that could do that that would be great

or if anyone knows a way to prevent the cells from changing height after importing that would work too, not sure if thats possible though..

[BIGAL]

I think what you want is (vla-setrowheight objtable ht) you have to repeat for all the rows you want to change, you will need (vla-get-rows objtable) to work out how many rows, usually start row count at 2 Title & header, so repeat = rows - 2. There is also textheight and text alignment to consider.

list of methods for a table.txt

Edited October 28, 2021 by BIGAL

[Dadgad]

Are you using a DEFINED Table Style?

If not create one, SAVE it and set it as CURRENT TABLE STYLE in your drawing.

If there is subsequently an issue, just selet the table as a whole, and change the STYLE in properties.

 

You might also want to make that Table Style CURRENT in whichever .dwt file you use, for QNEW, so that it is always onboard

whenever you start to create a new drawing. 

 

[Jonathan Handojo]

I agree with @Dadgad's approach. It can very well be automated using @BIGAL's approach, but an even better practice is to create and use a defined table style. It's pretty much in every working environment that is always a good practice to have a template set up for your projects. Revit users especially would have an idea because it's a huge pain to set up visibility graphics and whatnot per level for every single floor, so might as well just have a template with everything ready to use.