• 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.

Waarde onder 50 veranderen naar 50?

Status
Niet open voor verdere reacties.

Mickets

Nieuwe gebruiker
Lid geworden
28 jun 2010
Berichten
2
Kan ik verschillende waarde onder de 50 naar 50 veranderen in een keer?
Ik zit namelijk met een probleem. Ik heb een hele lijst met bedragen.
Het minimum tarief is 50 nu staan deze allemaal door elkaar op datum en moet ik dus alles onder de 50 veranderen naar 50!!
Iemand enig idee hoe ik dit makkelijk en snel kan doen?

Bvd,

Mick :thumb:
 
Misschien kan je dit gebruiken, veranderd alles onder de 50 in kolom A naar 50
Code:
Sub VeldenVeranderen()

For I = 1 To Range("A65000").End(xlUp).Row
   If Cells(I, 1) < 50 Then
   Cells(I, 1) = "50"
   End If
Next I
End Sub

Groet HWV
 
Hetzelfde kan ook eenvoudig zo:
Als de getallen in kolom A staan, beginnend in A1,
typ dan in B1: =ALS(A1<50;50;A1)
en kopieer B1 naar beneden in kolom B.
Daarna kun je kolom A verwijderen.
 
Code:
=ALS(A1<50;50;A1)
Dit kan nog eenvoudiger
Dus hier een derde weg naar Rome:

Code:
=MAX(50;A1)
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan