• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Afronden naar beneden

Status
Niet open voor verdere reacties.
1

123biertje

Gebruiker
Lid geworden
24 sep 2014
Berichten
109
Goede morgen

Is het mogelijk om een ingevoerd cijfer af te ronden naar beneden, bv 8.09 zou naar 8.0 moeten, 8.1 blijft 8.1
Als het mogelijk is in het hele "vocht "kolom, is hier misschien een formule voor.

B.v.d. Henk
 

Bijlagen

  • Test.xlsx
    8,5 KB · Weergaven: 29
ja, dat is mogelijk.
Code: 
=AFRONDEN.BENEDEN(C2;0,1)
 
bedankt voor je reactie

maar is het ook mogelijk dat je het invoert in c2 en dan gelijk afrond zonder extra kolom.

B.v.d. Henk
 
Beste AlexCel

VBA is ook geen probleem, en zou dan de uitkomst ook altijd 1 cijfer achter de komma kunnen zijn.

Mvg Henk
 
Ben geen VBA-expert, maar dat wordt dan zoiets.
Code: 
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("C2:C100")) Is Nothing Then
    Application.EnableEvents = False
    Target.Value = Target.Application.WorksheetFunction.RoundDown(Target.Value, 1)
    Application.EnableEvents = True
End If
End Sub
Misschien kunnen de VBA specialisten dit nog wat verbeteren?
 
Laatst bewerkt:
afronden naar beneden met VBA

Beste AlexCel

Misschien doe ik iets verkeert maar het lukt mij niet, hierbij mijn bestand met VBA
 

Bijlagen

  • Test1.xlsm
    14,8 KB · Weergaven: 28
Je hebt de code in een gewone module in plaats van in de module van Blad1 gezet.
 
afronden naar beneden met VBA

Bedankt iedereen, mijn "probleem"is metr behulp van jullie opgelost:thumb:

Mvg Henk
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan