Excel Array Formula with VBA (nothing happens)

[Ghesselink]

Hello,

I try to get a array formula within excel with 2 parts. However, when I execute the code, only the first formula appears (without replacing the last part).
Any idea what could be wrong?

Thanks a lot in advance,

Sub ArrayMacro()


Dim theFormulaPart1 As String
Dim theFormulaPart2 As String




theFormulaPart1 = "=CONCATENATE(IFERROR(INDEX(Information!$N$1:$N$25000,MATCH($B2&Hulpsheet!A$4,Information!$E$1:$E$25000&Information!$L$1:$L$25000,0)),""""),Replacethis)"


theFormulaPart2 = "=IFERROR(INDEX(Information!$N$1:$N$25000,MATCH($B2 & Hulpsheet!A$5,Information!$E$1:$E$25000&Information!$L$1:$L$25000,0)),"""")"


With Sheets("Sheet1").Range("M1")
    .FormulaArray = theFormulaPart1
    .Replace "Replacethis", theFormulaPart2, xlPart


End With


End Sub

 

[steve the fish]

Quick look. Part2 definately wouldnt have an = sign so remove that and try again.

 

[Ghesselink]

That's it. Simple, but very easy to not notice apparently ..

Thank you