主题：发现一个新问题，如何解决，请帮忙？

我不知道你要这个干嘛用,你看看好像没有人在谈到这个问题,如果你要用于编辑窗口,你这样:

If e.Table.name = "库存主表_Table1" 
    tables("库存主表").Position = CurrentTable.Current.Index 
    forms("编辑窗口").open()   '打开编辑窗口
End If


   自动对应.