在 VBA 中求解具有多个未知数的方程
Solving equation with multiple unknowns in VBA
我是 VBA 的新手,如果我的问题太含糊,请原谅我。我在 excel 中有一行接受输入并最终计算总和。例如,这可能是在单元格 A1、B1、C1 中进行用户输入,最后一个单元格中的计算将是:
D1 = A1*3 + B1*8 + C1*14
不同之处在于,我不只是在单元格 A1:C1 中插入值,而是在 D1 中得到我应该获得的值,我需要找到 A1:C1 中应该输入的内容。所以简而言之,我需要编写一个 VBA 程序来决定输入应该是什么以获得尽可能接近 D1 中所需值的解决方案。
我非常感谢任何 ideas/code 示例来帮助我入门,因为目前我有点卡住了。我希望这是有道理的!
我敢肯定,你的问题比你写的更受限制,因为它确实有很多自由度。
示例解决方案:
A1 = B1 = C1 = X
X = D1/(14+8+3) = D1/25
或
A1 = B1 = 0
-> C1 = D1
或者您使用没有 Objective 函数的 Excel Solver
来找到任何可行的解决方案。
我是 VBA 的新手,如果我的问题太含糊,请原谅我。我在 excel 中有一行接受输入并最终计算总和。例如,这可能是在单元格 A1、B1、C1 中进行用户输入,最后一个单元格中的计算将是:
D1 = A1*3 + B1*8 + C1*14
不同之处在于,我不只是在单元格 A1:C1 中插入值,而是在 D1 中得到我应该获得的值,我需要找到 A1:C1 中应该输入的内容。所以简而言之,我需要编写一个 VBA 程序来决定输入应该是什么以获得尽可能接近 D1 中所需值的解决方案。
我非常感谢任何 ideas/code 示例来帮助我入门,因为目前我有点卡住了。我希望这是有道理的!
我敢肯定,你的问题比你写的更受限制,因为它确实有很多自由度。
示例解决方案:
A1 = B1 = C1 = X
X = D1/(14+8+3) = D1/25
或
A1 = B1 = 0
-> C1 = D1
或者您使用没有 Objective 函数的 Excel Solver
来找到任何可行的解决方案。