Code: Select all
oCell.Formula = "=LOOKUP(A2;$'rule'.$A$2:$A$9;$'rule'.$B$2:$B$9)"
Code: Select all
for id=2 to NumRows
oCell = Sheet.getCellrangeByName("B"&id)
arg = "A"&id
oCell.Formula = "=LOOKUP(arg;$'rule'.$A$2:$A$9;$'rule'.$B$2:$B$9)"
next id