Runtime Error '1004': Application-defined or Object-defined error

[SkywardPalm]

Having trouble with this specific line of vba code

            c.Value = "=SUMPRODUCT(MID(0&A" & i & ", LARGE(INDEX(ISNUMBER(--MID(A" & i & ", ROW(INDIRECT(""""1:""""&LEN(A" & i & "))), 1)) * ROW(INDIRECT(""""1:""""&LEN(A" & i & "))), 0), ROW(INDIRECT(""""1:""""&LEN(A" & i & "))))+1, 1) * 10^ROW(INDIRECT(""""1:""""&LEN(A" & i & ")))/10)"

that is meant to place this formula

=SUMPRODUCT(MID(0&A2, LARGE(INDEX(ISNUMBER(--MID(A2, ROW(INDIRECT("1:"&LEN(A2))), 1)) * ROW(INDIRECT("1:"&LEN(A2))), 0), ROW(INDIRECT("1:"&LEN(A2))))+1, 1) * 10^ROW(INDIRECT("1:"&LEN(A2)))/10)

into all the cells in a range. I think it has to do with the way I'm attempting to place double quotations inside the formula..

 

[Fluff]

You should only have 2 pairs of quotes around the 1: not 4