主题：自动标题行高问题

这个貌似没有办法，有底层的组件决定的，DefaultRowHeight的优先级最高。只能自己指定一个具体的高度值了

还有一种情况,就是表中可能有一个备注列,内容比较多,如果此时自动行高的话因备注列就变成行高太高很不适合,

这个意思？根据第二列设置行高

 

Dim t As Table = Tables("表A")
Dim  cname As String = "第二列"
Dim lc As Integer = t.cols(cname).index+1
Dim br As Integer = t.rows.count
t.grid.AutoSizeRows(0, lc, br, lc, 0, 0)

3楼的功能有办法实现吗?即排除一些列再自动自动行高,谢谢!

参考4楼代码

不是根据某列自动行高,而是排除那一列按其他的列自动行高

1-5列，设置行高

 

Dim t As Table = Tables("表A")
Dim lc As Integer = 1
Dim br As Integer = t.rows.count
Dim rc As Integer = 5
t.grid.AutoSizeRows(0, lc, br, rc, 0, 0)

请帮忙说明一下  AutoSizeRows(0, lc, br, rc, 0, 0) 括号中六个参数分别指什么,谢谢!

AutoSizeRows(起始行, 起始列, 结束行, 结束列, 0, 0)