Вашу задачу гораздо проще решить на VBA.
После добавления нового листа запускаете макрос он обновит формулу.
Public Sub Test()
Dim i As Integer, sFormula As String
sFormula = "="
For i = 1 To ThisWorkbook.Sheets.Count
If i >= 4 Then
sFormula = sFormula & "'" & ThisWorkbook.Sheets(i).Name & "'!R2C2+"
End If
Next
If sFormula <> "=" Then
sFormula = Left(sFormula, Len(sFormula) - 1)
ThisWorkbook.Sheets(1).Range("A1").FormulaR1C1 = sFormula
End If
End Sub
Как выглядит Ваша формула - можно посмотреть при запуске макрорекордера.