Van tekst terug naar werkende formule ?

[gunarke]

Beste forumleden ,

Ik zou graag een oplossing vinden om van een formule als tekst terug een werkende formule te maken.

Na heel wat opzoekingswerk heb ik nog geen oplossing kunnen vinden.

Hopelijk weten jullie het antwoord.

Zie bijlage ter verduidelijking.

Alvast bedankt voor de hulp

 

[Timshel]

Ik begrijp niet wat de bedoeling is van de formules in kolom H. Als je formules zichtbaar wil maken in de cel kun je dat instellen in de opties.
Maar goed als antwoord op je vraag. Selecteer kolom J en draai de macro:

Option Explicit

Sub tsh()
    Dim Cl As Range
    
    For Each Cl In Selection.SpecialCells(2)
        Cl.FormulaLocal = Cl.Value
    Next
End Sub

 

[gunarke]

Formules die ik niet kan doortrekken omdat ze niet opeenvolgend zijn zet ik eerst om naar tekst.
Vandaar mijn vraag .

Heel erg bedankt voor de oplossing. Het werkt prima .

Is het mogelijk nog wat uitleg te geven op welke manier de code werkt ?

Wat doet : Dim Cl As Range ?

 

[Timshel]

Option Explicit 'stel variabelendeclaratie verplicht

Sub tsh()
    Dim Cl As Range 'declareer een variabele met naam Cl van het type Range
    
    For Each Cl In Selection.SpecialCells(2) 'Pas de volgende bewerking toe op iedere cel met waarde uit het geselecteerde bereik.
        Cl.FormulaLocal = Cl.Value 'maak van de celwaarde een formule
    Next 'herhaal
End Sub

Kun je niet beter gebruik maken van de functie INDIRECT in kolom H?

=INDIRECT(E4)*INDIRECT(G4)

Dat scheelt weer een paar handelingen.

 

[E v R]

Formules die ik niet kan doortrekken omdat ze niet opeenvolgend zijn zet ik eerst om naar tekst.

Vaak zit er wel een bepaalde structuur in, waardoor het eventueel wel kan/zou kunnen

 

[MarcelBeug]

Er bestaat nog een oude functie EVALUEREN die je alleen nog kunt gebruiken in een gedefinieerde naam.
In de bijlage heb ik eerst cel K4 geselecteerd en toen de naam eval gedefinieerd als: =EVALUEREN(Blad1!J4)
Dat betekent dat overal waar je =eval in een cel plaatst, de formule (in tekst) in de cel links van de cel met de formule wordt uitgevoerd.
De Excel werkmap moet je opslaan als macro-enabled omdat EVALUEREN in de achtergrond een macro uitvoert.

 

[gunarke]

Bedankt , ben weer wat wijzer geworden dankzij jullie hulp .

De formule met indirect is inderdaad een betere oplossing dan de macro.

De vraag mag worden gemarkeerd als opgelost .

 

[plongske]

De vraag mag worden gemarkeerd als opgelost .

Dat mag je zelf doen bovenaan je vraagstelling