以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- addtable 表格功能中的首列如何自动变宽? (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=148199) |
-- 作者:lanbor -- 发布时间:2020/4/2 9:31:00 -- addtable 表格功能中的首列如何自动变宽? 在使用 Addtable 表格功能时 它的第一列,没有自动变更宽度,请问如何设置? With wb.Add Table("form1","Table1") .PageNumber = page \'设置页码 \'.MergeCols = 2 \'合并左边2列 .Colwidth="12px" .Highlight= 1 .Alternate = 2 \'每2行显示一个不同背景颜色的行 .head.AddRow(nms1) For Each dr As Row In Tables("tjb2").Rows With .body.addrow(dr("客户")) \'----这第一列的客户始终只能一行显示3个字符,就自动换行了,在显示器上放大也是如此,后面的2列会自动放大宽度。 .addcell(For mat(dr("rate_rmb_1"),"#,###.00"),"class=\'alignC\'") .addcell(For mat(dr("rate_rmb_1vp"),"P"),"class=\'alignC\'") \'.addcell(Fo rmat(dr("sales_jr_2"),"#,###.00"),"class=\'alignC\'") \'.addcell(For mat(dr("sales_jr_2vp"),"P"),"class=\'alignC\'") End With Next End With [此贴子已经被作者于2020/4/2 9:33:39编辑过]
|
-- 作者:有点蓝 -- 发布时间:2020/4/2 10:36:00 -- 去掉.Colwidth="12px",都自己限制了还有啥好说的 |