Decimalen Afronden VBA

[koenkidv]

Beste Excellers.

Ik heb een bepaalde range die ik graag wil afronden in decimalen.
Heeft iemand een idee hiervoor?

(Off-Topic) Weet iemand of Worksheet.nl terugkomt? Aangezien hier veel mensen ook op zitten. Is dit dan de nieuwe forum ?

Koen

 

[xanderke]

misschien zoiets?

Sub RoundIt()

Dim MyRange As Range

Application.ScreenUpdating = False
Set MyRange = Range("A1:A3")

For Each Cell In MyRange
Cell.Value = Round(Cell.Value, 2)

Next Cell

End Sub

 

[Cobbe]

Dit zal ook wel voldoen:

Sub afronden()
  Range("A1:A3").NumberFormat = "0.00"
End sub

 

[robdgr]

(Off-Topic) Weet iemand of Worksheet.nl terugkomt? Aangezien hier veel mensen ook op zitten. Is dit dan de nieuwe forum ?

Het antwoord op je eerste vraag staat op de site:

Helaas stopt Worksheet met deze website. De beheerder heeft onvoldoende tijd om de website te blijven onderhouden. De afgelopen periode zijn de technische problemen toegenomen, waardoor het beheer veel meer tijd vraagt dan voorheen. Heel erg bedankt voor al jullie bijdragen aan deze site!

Helpmij is niet het nieuwe forum: beide bestonden al jaren naast elkaar.

 

[koenkidv]

Bedankt Cobbe! Dat was hem!
Robdgr. Die zin had ik ook gevonden idd. maar bedankt voor het antwoord!