小白求助大神们修改一下代码，谢谢！

淡墨青衫A8 · 发表于 2024-5-8 14:20

Private Sub Workbook_Open()
Sheets("客户合同目录").Select
End Sub
需要实现的目的：1：把以上代码放在附件里，实现每次打开工作簿时打开固定的工作表。

                        2：每次打开工作簿时，只需要弹窗提醒第一张工作表，不需要弹窗提醒其它工作表【附件中已有代码】
                           PS:目前的情况是：总是弹窗最后保存编辑的那张工作表。

                        3：能否改动一下代码，以便实现提前3天或者7天弹窗预警提醒，还有大于等于今天日期的过期提醒。

      附上附件，谢谢大神！

zjdh · 发表于 2024-5-8 14:52

你先将附件完善一下，另哪一个表算第一张工作表？？

淡墨青衫A8 · 发表于 2024-5-8 19:21

zjdh 发表于 2024-5-8 14:52
你先将附件完善一下，另哪一个表算第一张工作表？？

你好，我的意思是：1：我希望每次打开工作簿时，显示的界面都是“客户合同目录”这张工作表

2：我希望每次打开工作簿时，弹窗提醒的是“东部片区客户合同”这张工作表里面的数据【D列的数据】。

【现在的代码是：每次打开工作簿时，弹窗提醒的是最后保存编辑的工作表】

淡墨青衫A8 · 发表于 2024-5-8 19:32

本帖最后由淡墨青衫A8 于 2024-5-8 19:33 编辑

zjdh 发表于 2024-5-8 14:52
你先将附件完善一下，另哪一个表算第一张工作表？？

你好，再补充一下我的意思：我希望的是，当“东片区客户合同”中D列的日期过期或者提前3天和7天出现弹窗提醒，当“西片区客户合同”和“”客户合同目录“这2张工作表中日期过期也不弹窗提醒。【只提醒”东片区客户合同“这个工作表】

zjdh · 发表于 2024-5-9 20:23

到期弹窗提醒.rar (13.8 KB, 下载次数: 5)

淡墨青衫A8 · 发表于 2024-5-10 08:49

zjdh 发表于 2024-5-9 20:23

非常感谢大神，您真是太牛了

		自动登录	找回密码
密码			免费注册