| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]隐藏全部列和显示全部列的代码怎么写 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=3473) |
| -- 作者：tianhe95 -- 发布时间：2009/7/7 19:22:00 -- [求助]隐藏全部列和显示全部列的代码怎么写 一个表有300多列，根据不同窗口页面显示不同列，一行一行写代码有点累，有没有简单一点的代码 |
| -- 作者：smileboy -- 发布时间：2009/7/7 20:32:00 -- 隐藏： For Each cl As Col In CurrentTable.Cols CurrentTable.Cols(cl.name).Visible = False Next 显示： For Each cl As Col In CurrentTable.Cols CurrentTable.Cols(cl.name).Visible = True Next |
| -- 作者：tianhe95 -- 发布时间：2009/7/7 22:19:00 -- 谢谢，不过速度有点慢，有一个停顿，不像隐藏和显示行那样瞬间完成，但基本满足要求，还是要谢谢 [此贴子已经被作者于2009-7-7 22:23:55编辑过]
|
| -- 作者：狐狸爸爸 -- 发布时间：2009/7/7 22:42:00 -- CurrentTable.Redraw= False For Each cl As Col In CurrentTable.Cols CurrentTable.Cols(cl.name).Visible = True Next CurrentTable.Redraw= True |
| -- 作者：shaof -- 发布时间：2009/7/7 23:12:00 -- 做两个视图多好。 |