LISP用于控制表格行
外面有人吗？请帮忙几天来，我一直在研究如何控制excel链接表的坝行高度。
每次单元格中的文本换行到下一行时，它都会自动增加单元格的高度，以围绕下一行文本进行调整。这很好，但当我将文本编辑回单行时，单元格高度不会随之调整。
如果有一个神奇的Lisp程序，将使我的细胞高度自动调整回来，这将是一个头奖。。。但我至少需要一个简单的lisp，它会自动将行高度设置为以下值：
（英寸）
行1=0.53803341
行2=0.15907332
第3-41行=0.32812500
嗨，欢迎来到CADTutor
您可以使用cvunits转换单位
（cvunits数字“inches”“meter”）或相反
（定义c：测试（/ss选项卡）（提示“\n单击ACAD TABLE….”）（if（setq ss（ssget“+：E:S:L”（（0。“ACAD\u TABLE”）））（（lambda（row/）（repeat row（vla SetRowHeight tab（setq row（1-row））（cond（（=0行）0.53803341）（=1行）0.15907332）；（=n行）高度） 感谢您这么快回复hanhphuc。不幸的是，我没能让它工作。可能是我，我对lisp不太了解。我试着在APPLOAD中输入，然后拖放。lsp文件。我确实看到你的身高是正确的。我不知道你说的cvunits是什么意思。让我试着澄清这个问题，以及我正在寻找的解决方案。
1）我从链接到excel电子表格的表格开始。（万事如意）
2）我将电子表格中的信息下载到表格中，当单元格中的一些文本换行到第二行时，行高就会异常。
3）我们不能改变我们的指数边界（严格的公司标准）。因此，如果加载到单元格中的原始文本太长，我们必须将标题缩短到刚好可以容纳一行文本。但在我的表格中，将文本固定回单行后，行将不会调整回其原始高度。
4.）这就是我需要一个lisp的地方，我可以加载它，它会自动将我的行恢复到原始高度。否则我必须手动完成，这对我的同事来说是一个破坏交易的因素。
我一共有41行。
原始行高度
行1=0.53803341
行2=0.15907332
第3行到第41行=0.32812500
（我希望这些图片附得正确）
抱歉，hanhphuc，我必须做一些研究来找出如何正确运行lisp。它贯穿每一行，并像我需要的那样固定行高度，但它将第2行设置为与第1行相同的高度。我试着玩弄它，但我想不出来。有什么想法吗？
在查看带有/不带有标题的图像后，表行是从零开始的。0=第1行，1=第2行等。。
代码将很快更新
（cond（（=0行）0.53803341）（（=1行）0.15907332）（0.32812500）；
页:
[1]