数据执行过程中保存环节出错，求助老师帮忙看一下。

糖↗小冷

模块1 拆分成多工作表为执行模块3备用；

模块2 拆分成多工作薄；

模块3  多工作薄同时执行模块1；

运行模块3的时候，

关闭保存这行出错（模块3）

【工作表b】里面几行代码为控制关键单元格数值，可能就是这行代码用问题，但是不知道怎么解决了。。。。


求助老师帮忙看一看怎么优化。

3190496160

拆分问题，到我的主题里面去找找，几个拆分工具，拆成啥都行

糖↗小冷

3190496160 发表于 2023-2-15 08:48
拆分问题，到我的主题里面去找找，几个拆分工具，拆成啥都行

谢谢老师的指导，我觉得好像执行模块3的时候，保存设置有问题， 工作表执行自检代码的时候没执行完就要求保存了，可能冲突了，但是不知道怎么解决

剑指E

多处重复触发b工作表的事件程序，几近造成死循环

糖↗小冷

剑指E 发表于 2023-2-15 09:06
多处重复触发b工作表的事件程序，几近造成死循环

谢谢老师指导，但是在b工作表加上代码后，不能满足b表红色单元格的控制了，出现了负数

糖↗小冷

剑指E 发表于 2023-2-15 09:06
多处重复触发b工作表的事件程序，几近造成死循环

Private Sub Worksheet_Calculate()
    Dim v
            'Application.EnableEvents = False
    v = Range("t14").Value
    If v < 0.5 Or v > Range("t13").Value * 2 Then Me.Calculate
            'Application.EnableEvents = True
End Sub


我把B表里代码 也注释掉2行，好像好用了。。

糖↗小冷

剑指E 发表于 2023-2-15 09:06
多处重复触发b工作表的事件程序，几近造成死循环

把 B表里添加的两行 FLASH 和true 注释掉了，确实好用了，必须回来给老师送小花花

剑指E

糖↗小冷 发表于 2023-2-15 09:14
谢谢老师指导，但是在b工作表加上代码后，不能满足b表红色单元格的控制了，出现了负数

那就注释掉b的禁用事件代码

糖↗小冷

剑指E 发表于 2023-2-15 09:34
那就注释掉b的禁用事件代码

老师 帮忙看一看 这次  保存数据不一致是怎么回事？

剑指E

糖↗小冷 发表于 2023-2-16 14:25
老师 帮忙看一看 这次  保存数据不一致是怎么回事？

这种问题还是将b表里的rand函数去掉，用代码生成随机数，要么即使关闭自动计算也不能彻底解决问题。excel选项--公式选项卡改用手动计算看看吧