array formula in vba debugging error

Was hoping someone could assist me with making this formula work in vba:

=IFERROR(IF(I13="x","",TRIM(INDEX(Dep!$J$3:Dep!$J$100000,SMALL(IF(COUNTIF($E$4,Dep!$A$3:Dep!$A$100000)*COUNTIF($E$6,Dep!$B$3:Dep!$B$100000),ROW(Dep!$A$3:Dep!$H$100000)-MIN(ROW(Dep!$A$3:Dep!$J$100000))+1),ROW(Dep!A1)),COLUMN(Dep!A1)))),"")

It worked prior to adding the if statement, but I need the if statement to be part of the array if at all possible. Appreciate any assistance.

Maybe try

dim a 

a = evaluate("=IFERROR(IF(I13=""x"","""",TRIM(INDEX(Dep!$J$3:Dep!$J$100000,SMALL(IF(COUNTIF($E$4,Dep!$A$3:Dep!$A$100000)*COUNTIF($E$6,Dep!$B$3:Dep!$B$100000),ROW(Dep!$A$3:Dep!$H$100000)-MIN(ROW(Dep!$A$3:Dep!$J$100000))+1),ROW(Dep!A1)),COLUMN(Dep!A1)))),"""")")