Opgelost Macro - berekening uitvoeren op geselecteerde cellen

[hmwul]

Op voorhand: ik weet niet of het mogelijk is...

Wat ik zoek is het volgende.

Situatie nu: (voorbeeld)
=round(a1*2,02371;2) (euro's naar guldens, afgerond op 2 decimalen)
of bij een aaneengesloten reeks: =ROUND(A1:A7*2,20371;2)

ik vraag mij af of het mogelijk is om een cel (of reeks) te selecteren, dan een macro uit te voeren, die dan de bovenstaande berekening uitvoert.

Thanks.

 

[AHulpje]

Sub EuroNaarGulden()
    For Each c In Selection
        c.Value = Round(c.Value * 2.20371, 2)
    Next
End Sub

 

[hmwul]

Fantastisch!!
Heel hartelijk dank.
Ik had geen idee dat het inderdaad kon... had ik het maar eerder gevraagd.
Dit scheelt een hoop werk.
Iedere keer weer opnieuw de formule invoeren in de kolom ernaast.

Nogmaals dank!