以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  遇到多层表头设置行高问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=188703)

--  作者:aidimeng
--  发布时间:2023/10/12 12:39:00
--  遇到多层表头设置行高问题
问题一
在HeaderRows =1 时 语句Tables("表A").SetHeaderRowHeight(20.25)  起作用
HeaderRows >1 执行SetHeaderRowHeight(20.25) 没反应
这是为什么呢

问题二 
SetRowHeight 只能设置特定行的高度,能否设定所有行一个高度呢



--  作者:有点蓝
--  发布时间:2023/10/12 13:43:00
--  
Dim ss(Tables("表A").HeaderRows - 1) As Integer
For i As Integer = 0 To Tables("表A").HeaderRows - 1
    ss(i) = 30
Next
Tables("表A").SetHeaderRowHeight(ss)