主题：请教打开分组统计表的代码？

提问要具体一些，否则别人很难理解你的问题，更谈不上帮忙了。

 我做了一张工资表，员工、产品、计件工件，计件数量、计件金额。又做了两张汇总表，一张按产品，一张按员工。

我做了，TOPICBAR窗口

Select Case e.Link.Name
    Case "人员档案"
        MainTable  = Tables("penson")
    Case "工价档案"
        MainTable  = Tables("gj")
    Case "工时档案"
        MainTable = Tables("penson")
    Case "单据录入"
        MainTable=Tables("work")   
    Case "工资查询表"
        MainTable=Tables("工资查询表")   
    Case "产品工时"     
        MainTable=Tables("产品工时")   
    Case "员工产品工时"     
        MainTable=Tables("员工产品工时")       这两张为统计表名字，是不是写的打开命令不对。
End Select

MainTable = Tables("表名")

另： 别人是看不到你发的图片的，图片需要上传，别人才能看见

我做了一张工资表，员工、产品、计件工件，计件数量、计件金额。又做了两张汇总表，一张按产品，一张按员工。

我做了，TOPICBAR窗口

Select Case e.Link.Name
    Case "人员档案"
        MainTable  = Tables("penson")
    Case "工价档案"
        MainTable  = Tables("gj")
    Case "工时档案"
        MainTable = Tables("penson")
    Case "单据录入"
        MainTable=Tables("work")   
    Case "工资查询表"
        MainTable=Tables("工资查询表")   
    Case "产品工时"     
        MainTable=Tables("产品工时")   
    Case "员工产品工时"     
        MainTable=Tables("员工产品工时")       这两张为统计表名字，是不是写的打开命令不对。
End Select

没有什么不对的，直接在命令窗口测试：

MainTable=Tables("产品工时")

如果能切换到产品工时表，说明代码没有问题，不能执行的原因就是e.link.name并不等于“产品工时”

你可以在代码的第一行加上：

messagebox.show(e.link.name)

'你原来的代码

谢谢，狐爸，搞定了。