Excel formule omzetten naar VBA

[Burgers]

Wie kan mij helpen de formules van het bijgevoegde bestand om te zetten naar VBA.
De formules werken in Excel prima, maar omdat het bestand door diverse personen gebruik wordt wil ik de formule beter beschermen. Met beveiligen en werkmap delen werkt dit wel, maar ik wil ook regels kunnen toevoegen en verwijderen.

 

[Roncancio]

In bijgevoegd bestand zit een macro die de formules aanmaakt voor de cellen in de rijen 5 t/m 30.

Met vriendelijke groet,


Roncancio

 

[Burgers]

Hallo,

Bedankt voor de reactie.
Het is alleen de bedoeling dat de formules niet meer in excel staan maar op de achtergrond werken in vba, zodat de 3 laatste kolommen geheel kunnen vervallen.
Ik hoop dat je hier een oplossing voor hebt.

Eddy

 

[Roncancio]

Hallo,

Bedankt voor de reactie.
Het is alleen de bedoeling dat de formules niet meer in excel staan maar op de achtergrond werken in vba, zodat de 3 laatste kolommen geheel kunnen vervallen.
Ik hoop dat je hier een oplossing voor hebt.

Eddy

Wil je dan in de kolommen A t/m C alleen de uitkomsten of wil je daar wel de formules samengesteld uit de kolommen E,F en G?

Met vriendelijke groet,


Roncancio

 

[Burgers]

In de kolommen A t/m C moet alleen de uitkomst komen van de formules die in het voorbeeld staan.
Ik hoop dat je er iets mee kunt.

Eddy

 

[wiki]

Dit kun je achter de bestaande code plakken

Range("A5:C30").Copy
 Range("a5").PasteSpecial Paste:=xlPasteValues
 Range("E5:G30").Copy
 Range("E5").PasteSpecial Paste:=xlPasteValues
 Application.CutCopyMode = False

 

[Burgers]

Bedankt,

Ziet er al een stuk beter uit. Ik ga er mee aan de gang. Kom ik er niet uit of heb ik nog vragen dan meldt ik me weer.

Eddy

 

[Roncancio]

@Wiki & Burgers.
Als je de uitkomsten kopieert, dan ben toch de formules helemaal kwijt?
Ik neem aan dat de formules nog gebruikt moeten worden voor toekomstige berekeningen.
Of mis ik iets?

Met vriendelijke groet,


Roncancio

 

[wiki]

Ik probeer de vraag te beantwoorden en weet niet wat de uiteindelijke toepassing is.

 

[Burgers]

De formules ben je inderdaad kwijt. Na evt toevoegingen, moet de macro opnieuw gestart worden.
Mijn bedoeling is eigenlijk dat de bereking automatisch loopt zonder de macro opnieuw te starten.
Ik heb een bestandje bijgevoegd wat mijn bedoeling misschien duidelijker maakt. Dit bestand werkt met kleuren, maar moet toch ook mogelijk zijn met formules.
Als je in kolom H van het bijgevoegde bestand een getal(1 t/m5) invuld, veranderd de kleur in de kolommen B t/m F.
Ik hoop het hiermee duidelijker gemaakt te hebben.

Eddy