Any feedback is greatly appreciated!

Thanks so much

Dan

**=LOOKUP(9^99,IF({1,0},0,LOOKUP(2,1/(P1=data!P$1:P$10001)/(E1=data!E$1:E$10001),data!K$1:K$10001)))**

Code:

```
Range("K1").Select
ActiveCell.FormulaR1C1 = "=LOOKUP(9^99,IF({1,0},0,LOOKUP(2,1/(P1=data!P$1:P$10001)/(E1=data!E$1:E$10001),data!K$1:K$10001)))"
Range("K1").Select
```