主题：请问共有窗口是否能只针对其中几个表有效？

 你可以去编写maintablechanged事件

Select Case MainTable.Name

    Case "表A", "", "表C"

        Forms("窗口1").panel.parent.parent.Visible = True

    Case Else

        Forms("窗口1").panel.parent.parent.Visible = False

End Select