#### jigglypuff

##### New Member

- Joined
- Mar 28, 2013

- Messages
- 25

There is no way to put this code in a different way without it flooding me in lag.

Here is the code:

Code:

`If Target.Column = 3 And Target.Row >= 8 Then Cells(Target.Row, 4).Formula = "=IF(C:C="","",IF(AND(A:A>=40909,A:A<=40939),(C:C/Sheet1!$U$56)*1000,IF(AND(A:A>40939,A:A<=40968),(C:C/Sheet1!$U$57)*1000,IF(AND(A:A>40968,A:A<=40999),(C:C/Sheet1!$U$58)*1000,IF(AND(A:A>40999,A:A<=41029),(C:C/Sheet1!$U$59)*1000,IF(AND(A:A>41029,A:A<=41060),(C:C/Sheet1!$U$60)*1000,IF(AND(A:A>41060,A:A<=41090),(C:C/Sheet1!$U$61)*1000,IF(AND(A:A>41090,A:A<=41121),(C:C/Sheet1!$U$62)*1000,IF(AND(A:A>41121,A:A<=41152),(C:C/Sheet1!$U$63)*1000,IF(AND(A:A>41152,A:A<=41182),(C:C/Sheet1!$U$64)*1000,IF(AND(A:A>41182,A:A<=41213),(C:C/Sheet1!$U$65)*1000,IF(AND(A:A>41213,A:A<=41243),(C:C/Sheet1!$U$66)*1000,IF(AND(A:A>41243,A:A<=41274),(C:C/Sheet1!$U$67)*1000,IF(AND(A:A>41274,A:A<=41305),(C:C/Sheet1!$U$39)*1000,IF(AND(A:A>41305,A:A<=41333),(C:C/Sheet1!$U$40)*1000,IF(AND(A:A>41333,A:A<=41364),(C:C/Sheet1!$U$41)*1000,IF(AND(A:A>41364,A:A<=41394),(C:C/Sheet1!$U$42)*1000,IF(AND(A:A>41394,A:A<=41425),(C:C/Sheet1!$U$43)*1000,IF(AND(A:A>41425,A:A<=41455),(C:C/Sheet1!$U$44)*1000,IF(AND(A:A>41455,A:A<=41486),(C:C/Sheet1!$U$45)*1000,IF(AND(A:A>41486,A:A<=41517),(C:C/Sheet1!$U$46)*1000,IF(AND(A:A>41517,A:A<=41547),(C:C/Sheet1!$U$47)*1000,IF(AND(A:A>41547,A:A<=41578),(C:C/Sheet1!$U$48)*1000,IF(AND(A:A>41578,A:A<=41608),(C:C/Sheet1!$U$49)*1000,IF(AND(A:A>41608,A:A<=41639),(C:C/Sheet1!$U$50)*1000,FALSE)))))))))))))))))))))))))"`

Thank you in advance.