在vba

Question

我设置了不同的范围：

rA3 = Sheets("Testa").Range("V1")
rB3 = Sheets("Testa").Range("W1")
rA4 = Sheets("Testa").Range("I2:K200")
sAdjust = Sheets("Testa").Range("F2:K200")
OpenSolver.AddConstraint LHSRange:=rA3, Relation:=RelationGE, RHSRange:=rB3

从我看到的情况来看，OpenSolver.SetObjectiveFunctionCell或OpenSolver.AddConstraint似乎无法识别这些内容，您必须使用Cells(i,j)和Union添加它们。 每当我尝试编译代码时，我都会收到以下错误

  

Erreur de compilation Type d'arguments ByRef不兼容

松散翻译的

意味着ByRef参数不兼容。

有谁知道如何有效地添加像sAdjust这样的大范围？