创建不带零的命名范围VBA以帮助求解计算时间

编程问答 2022-06-09

问题描述

我试图帮助求解器仅关注需要通过设置范围而没有空白的计算单元格，因此我在下面的示例中进行了尝试。但是，解决范围分开的工作吗？求解器花了2分钟之前，但是在我有关于分隔范围的约束之后，求解器给了我一些通配符，告诉我它不起作用。

由于需要显示具有这些零的其他数据，我无法过滤范围以使其不显示零，所以我可以做出其他选择或调整来使求解器专注于非零（或空白）单元格上）在ByChange:=Range("cuts_range")部分中？ （A1，A9和A10是切割范围）。

还是我想得太多，包括零在内的超长距离根本不会影响求解器？

所以在cuts_range = A1，A9，A10以下

Dim cuts_range As Range
Set cuts_range = Range("A1:A" & findLastRow(Range("A1"))).SpecialCells(xlCellTypeFormulas,xlNumbers)

SolverOk SetCell:=Range("$T$4").Offset(0,offsetCol),MaxMinVal:=1,ByChange:=Range("cuts_range") _,Engine:=1,EngineDesc:="GRG Nonlinear"

Example Range

-编辑---

再考虑一下之后，也许我可以创建一个循环以将非空格范围内的每个单元格添加为单独的约束。如果可行，将会报告。

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

excelexcelsolvervba