Ciao a tutti,
sono novello di macro e programmazione e mi trovo ora a dover risolvere questo problema.
Magari è banale, ma non ne esco.
Avrei la necessità di far eseguire un calcolo al risolutore per circa 3000 righe.
Il calcolo nella singola riga torna. Ho registrato la macro che mi minimizza una cella di questa riga i-esima, variando una cella della riga stessa (i).
Devo ora dire al programma di eseguire lo stesso calcolo per la riga sotto (i+1), logicamente prendendo la cella obbiettivo e la cella da variare della riga corrispondente (i+1).
Spero di essermi spiegato.
Questa è la macro che ho registrato.
Sub Macro()
'
' Macro Macro
'
'
SolverOk SetCell:="$N$2", MaxMinVal:=2, ValueOf:=0.84, ByChange:="$O$2", Engine _
:=1, EngineDesc:="GRG Nonlinear"
SolverOk SetCell:="$N$2", MaxMinVal:=2, ValueOf:=0.84, ByChange:="$O$2", Engine _
:=1, EngineDesc:="GRG Nonlinear"
SolverSolve
SolverOk SetCell:="$N$2", MaxMinVal:=2, ValueOf:=0.84, ByChange:="$O$2", Engine _
:=1, EngineDesc:="GRG Nonlinear"
End Sub
Grazie per l'aiuto.
Lorenzo