Formules kopieren in vba

Status
Niet open voor verdere reacties.

bramundstein

Nieuwe gebruiker
Lid geworden
4 mrt 2011
Berichten
1
Hallo iedereen,

Ik heb een excel bestand gemaakt met onwijs veel formules (als dit, dan dat en als dat dan... enz.). Omdat ik langzaam in het vba gebeuren kom had ik alle formules in het actieve werkblad gezet. Ik wil nu (vanwege de beveiliging) alles in vba gaan zetten, waardoor het voor mij makkelijker wordt om de formules aan te passen. Echter wanneer men goed naar het bestand gaat kijken verschillen de formules niet heel veel. Er veranderen steeds enkele verwijzingen naar cellen. Is dit makkelijk te programmeren en hoe werkt dat dan. Ik heb namelijk geen zin om ca. 44000 formules opnieuw in te voeren.

Hieronder heb ik een voorbeeld van een dergelijke formule geplaatst.
Deze formules staat bijv. in A1 en moet ook staat (met uiteraard een kleine aanpassing) in A5.

De formule:

=SOM(('<- Openingen e.d. Tab1'!D15:AQ15=Gegevens!C87)*('<- Openingen e.d. Tab1'!D13:AQ13=Gegevens!A92)*('<- Openingen e.d. Tab1'!D18:AQ18=Gegevens!D87:D88)*('<- Openingen e.d. Tab1'!D29:AQ29=Gegevens!D100)*('<- Openingen e.d. Tab1'!D12:AQ12))-SOM((('<- Openingen e.d. Tab1'!D15:AQ15=Gegevens!C87)*('<- Openingen e.d. Tab1'!D13:AQ13=Gegevens!A92)*('<- Openingen e.d. Tab1'!D18:AQ18=Gegevens!D87:D88)*('<- Openingen e.d. Tab1'!D29:AQ29=Gegevens!D100)*('<- Openingen e.d. Tab1'!D9:AQ9)))+PRODUCT(G10:J10)

De formule in A5 is dan bijv.

=SOM(('<- Openingen e.d. Tab1'!D42:AQ42=Gegevens!C87)*('<- Openingen e.d. Tab1'!D40:AQ40=Gegevens!A92)*('<- Openingen e.d. Tab1'!D45:AQ45=Gegevens!D87:D88)*('<- Openingen e.d. Tab1'!D56:AQ56=Gegevens!D100)*('<- Openingen e.d. Tab1'!D39:AQ39))-SOM((('<- Openingen e.d. Tab1'!D42:AQ42=Gegevens!C87)*('<- Openingen e.d. Tab1'!D40:AQ40=Gegevens!A92)*('<- Openingen e.d. Tab1'!D45:AQ45=Gegevens!D87:D88)*('<- Openingen e.d. Tab1'!D56:AQ56=Gegevens!D100)*('<- Openingen e.d. Tab1'!D36:AQ36)))+PRODUCT(L10:O10)

Als iemand een idee heeft hierover???
ik hoor het graag.

Met vriendelijke groet,

Bram
 
Laatst bewerkt:
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan