Excel Solver Named Ranges в VBA

Question

Можно ли изменить скрипт vba, чтобы при определении параметров для «Solver» я мог использовать «Имена» для разных диапазонов вместо абсолютных ссылок на ячейки?

В приведенном ниже примере различные диапазоны определены в электронной таблице как;

$A$1 ..... "obj_func" 
$E$8:$E$11,$I$8:$M$11 ..... "bin_var", "qty_cut" 
$C$8:$C$11 ..... "qty_used" 



SolverOk SetCell:="$A$1", MaxMinVal:=2, ValueOf:=0, ByChange:= _ 
"$E$8:$E$11,$I$8:$M$11", Engine:=2, EngineDesc:="Simplex LP" 

SolverAdd CellRef:="$C$8:$C$11", Relation:=1, FormulaText:="stock_lengths" 

Answer 1

UNTESTED

Попробуйте заменить:

SolverAdd CellRef:="$C$8:$C$11", Relation:=1, FormulaText:="stock_lengths" 

с:

SolverAdd CellRef:=Range("qty_used").Address, Relation:=1, FormulaText:="stock_lengths"