主题：在SQLGroupTableBuilder等专业统计工具中统计出的列如何自动设置最佳列宽？

如题。上图列出今天8月份的统计表，下个月再统计就出现9月份的统计表，统计表的列名总是变动的，用代码一个个实现不方便，最好在统计中增加自动设置最佳列宽的参数。

大概应该这样吧。

Tables("统计表1").Select(0,0,0,Tables("统计表1").Cols.Count-1)
Sendkeys.Send("{Tab 3}~")
Syscmd.Column.Width()
Tables("统计表1").Select(0,0)

可以这样设置，不用考虑表名、列名，通用:

For Each c As Col in Tables("xxx").Cols

     if c.DataCol.IsNumeric Then

        c.Width - 100

     End If

Next

收藏

老六少打了个=

不过这样是返回默认列宽。

For Each c As Col in Tables("xxx").Cols

     if c.DataCol.IsNumeric Then

        c.Width = 100 '100是希望的列宽

     End If

Next