Need help in using First Responder Wins voting in AME

Question

Hi All,
Following is my requirement.
Create custom workflow for payments in lease and it will have three levels of approvals.
Fisrt level should go to two persons in parallel, if any one approves it should go to next levels in series.
So i created AME Approver type with static persons and given voting as first responder wins but getting error as "parallelization, context in which ame package called is not supported".
Request your help in achieving this requirement.
Thanks
Rajesh

Answer 1

Hi snoopyish,
>> I've tried to run the Solver once for the first row (row 2), and recorded the Macro code as below. Please could someone help me with rewriting it as a loop?
Do you mean that you want to loop the column "AB"  from row 2 to row 29991, if so, I think you could use the "For  i=2 to 29991 Next i" statement to achieve that, you could refer the link below for Looping through a range of
cells.
# Looping Through a Range of Cells [Excel 2003 VBA Language Reference]
https://msdn.microsoft.com/en-us/library/office/aa221353(v=office.11).aspx
Some key code as below, you need to modify it as your own requirement:
Sub icoe()
' icoe Macro
For i = 2 To 29991
SolverOk SetCell:="$AC$2", MaxMinVal:=3, ValueOf:=0, ByChange:=Range("$AB$" & i), Engine _
:=1, EngineDesc:="GRG Nonlinear"
SolverAdd CellRef:=Range("$AB$" & i), Relation:=1, FormulaText:="1"
SolverAdd CellRef:=Range("$AB$" & i), Relation:=3, FormulaText:="0.0001"
SolverOk SetCell:="$AC$2", MaxMinVal:=3, ValueOf:=0, ByChange:=Range("$AB$" & i), Engine _
:=1, EngineDesc:="GRG Nonlinear"
SolverOk SetCell:="$AC$2", MaxMinVal:=3, ValueOf:=0, ByChange:=Range("$AB$" & i), Engine _
:=1, EngineDesc:="GRG Nonlinear"
SolverSolve
Next
End Sub
Best Regards,
Edward
We are trying to better understand customer views on social support experience, so your participation in this interview project would be greatly appreciated if you have time. Thanks for helping make community forums a great place.
Click HERE to participate the survey.