在afteropenproject事件写代码
Tables("表A.表B").Visible = False
Tables("表A.表C").Visible = False
Tables("表A.表C").Visible = true
Tables("表A.表B").Visible = true