乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
查看: 44|回复: 2

[编程交流] 更改表格数据行高a

[复制链接]

30

主题

81

帖子

59

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
146
发表于 2022-7-5 16:46:36 | 显示全部楼层 |阅读模式
各位同事,
 
不可能通过(快速选择或筛选)一次选择所有表数据行“而不是标题行”以更改其高度
我的一张图纸有75张桌子
需要帮助
 
谢谢
湿婆
回复

使用道具 举报

18

主题

1529

帖子

973

银币

中流砥柱

Rank: 25

铜币
649
发表于 2022-7-5 17:29:25 | 显示全部楼层
你试过改变一下桌子的样式吗?
回复

使用道具 举报

55

主题

402

帖子

357

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
274
发表于 2022-7-5 17:55:57 | 显示全部楼层
这里有一个快速的解决方案,它跳过第一行,并根据您的输入更改其余行的行高。
不确定这是你想要的:-
 
  1. (defun c:test (/ a b c d i)
  2. (if (and (setq a (ssget '((0 . "*TABLE"))))
  3.    (setq b (getdist "\nSpecify Row Height : "))
  4.      )
  5.    (repeat (setq i (sslength a))
  6.      (setq c (vlax-ename->vla-object (ssname a (setq i (1- i)))))
  7.      (setq d 1)
  8.      (while (< 0 d (vla-get-rows c))
  9. (vla-setrowheight c d b)
  10. (setq d (1+ d))
  11.      )
  12.    )
  13. )
  14. (princ)
  15. )
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-3-13 14:21 , Processed in 0.495441 second(s), 58 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表