formules in VBA

[math1]

Ik heb een spreadsheet met max. 35 werkbladen welke allemaal dezelfde indeling hebben maar verschillende gegevens bevatten.
Om een totaal overzicht te krijgen heb ik een blad toegevoegd waarin diverse gegevens van de werkbladen worden opgevraagd en getoond.
Daartoe heb ik 35 regels met steeds dezelfde formules waarbij alleen de celverwijzing verandert.
Voor het opvragen van de benodigde gegevens van 1 werkblad gebruik ik nu volgende formules.

[A7]=Basis!A7
[B7]=ALS(ISFOUT(INDIRECT(A7&"!e3"));"";INDIRECT(A7&"!e3"))
[C7]=ALS(ISFOUT(INDIRECT(A7&"!h4"));"";INDIRECT(A7&"!h4"))
[D7]=ALS(ISFOUT(INDIRECT(A7&"!m3"));"";INDIRECT(A7&"!m3"))
[E7]=ALS(ISFOUT(INDIRECT(A7&"!j4"));"";ALS(INDIRECT(A7&"!j4")=1;"Ja";""))
[F7]=ALS(ISFOUT(INDIRECT(A7&"!q4"));"";INDIRECT(A7&"!q4"))
[G7]=ALS(ISFOUT(INDIRECT(A7&"!h8"));"";INDIRECT(A7&"!h8"))
[H7]=ALS(ISFOUT(INDIRECT(A7&"!h9"));"";INDIRECT(A7&"!h9"))
[I7]=ALS(ISFOUT(INDIRECT(A7&"!h10"));"";INDIRECT(A7&"!h10"))
[J7]=ALS(ISFOUT(INDIRECT(A7&"!h11"));"";INDIRECT(A7&"!h11"))
[K7]=ALS(ISFOUT(INDIRECT(A7&"!h12"));"";INDIRECT(A7&"!h12"))
[L7]=ALS(ISFOUT(INDIRECT(A7&"!h13"));"";INDIRECT(A7&"!h13"))
[M7]=ALS(ISFOUT(INDIRECT(A7&"!h15"));"";INDIRECT(A7&"!h15"))
[N7]=ALS(ISFOUT(INDIRECT(A7&"!p8"));"";INDIRECT(A7&"!p8"))
[O7]=ALS(ISFOUT(INDIRECT(A7&"!p10"));"";INDIRECT(A7&"!p10"))
[P7]=ALS(ISFOUT(INDIRECT(A7&"!p11"));"";INDIRECT(A7&"!p11"))
[Q7]=ALS(O7>P7;"--";"+")
[R7]=ALS(ISFOUT(INDIRECT(A7&"!p12"));"";INDIRECT(A7&"!p12"))
[S7]=ALS(ISFOUT(INDIRECT(A7&"!r15"));"";INDIRECT(A7&"!r15"))
[T7]=ALS(ISFOUT(INDIRECT(A7&"!l15"));"";INDIRECT(A7&"!l15"))
[U7]=ALS(ISFOUT(INDIRECT(A7&"!m15"));"";INDIRECT(A7&"!m15"))
[V7]=ALS(ISFOUT(INDIRECT(A7&"!n15"));"";INDIRECT(A7&"!n15"))
[W7]=ALS(ISFOUT(INDIRECT(A7&"!o15"));"";INDIRECT(A7&"!o15"))
[X7]=ALS(ISFOUT(INDIRECT(A7&"!p15"));"";INDIRECT(A7&"!p15"))
[Y7]=ALS(ISFOUT(INDIRECT(A7&"!s105"));"";INDIRECT(A7&"!s105"))

In kolom A staan de namen van de verschillende werkbladen waarvan de gegevens worden opgevraagd.
De volgende kolommen vragen de waarde van een bepaalde cel op dat werkblad op.
Op dit hele blad staan dus een dikke 800 formules alleen voor het opvragen der waardes.

Mijn vraag is of dit te vereenvoudigen is b.v. in VBA zodat niet 35 van deze blokken formules op een werkblad staan.

Math