主题：表格提取数据问题

 With wb.AddTable("", "Table1")
            .PageNumber = page'设置页码
            .ActiveSheet = "menu" '指定菜单
            .Primarykey = "_Identify" '指定主键,主表编号设为主键.
            .CreateFromDataTable(dt, False, "", "", "tankno", "次数", "obvd", "tovcubmeter", "weightmetricton")
        End With

利用CreateFromDataTable自动生成的表格，能否实现在表格中点击一下，则执行某函数？