以下是引用Bin在2013-5-11 11:39:00的发言：可以扩充最后一列.Tables("表A").ExtendLastCol=True
等比例扩充比较麻烦,不好实现.
DefaultColWidth为什么不起作用？难道非得放在某一特定的事件中？
SetColVisibleWidth可以在很多事件中起作用。
方法倒是简单，列多的时候，列宽太小；列少的时候，列宽太大，难看。
For Each c As Col In CurrentTable.Cols
c.Width = WorkingAreaWidth / CurrentTable.Cols.Count
Next
下面给个基本的列宽，好看点。
For Each c As Col In CurrentTable.Cols
If c.Width <> 98 Then
c.Width = 98
End If
Next
CurrentTable.ExtendLastCol = True
[此贴子已经被作者于2013-5-11 16:26:00编辑过]
加好友 
发短信
Post By：2013/5/11 15:07:00 [显示全部帖子]
