Grootste getal in reeks

[Frankie1983]

zit met een klein probleempje

Wat voor code moet ik gebruiken als ik het grootste positieve getal en het grootste negatieve getal uit een reeks wil hebben??

alvast bedankt

 

[WinteE]

Je zult toch echt wat duidelijker moeten zijn.

Een bereik in Excel, Array in Access, Tabel in Access ..... ?

 

[Frankie1983]

gootste getal in een reeks cellen in excel

 

[WinteE]

Probeer dit eens :

Sub GrootstePositief()

varMax = 0

For Each Waarde In Range("Bereik").Cells
    
    If Waarde > varMax Then
        varMax = Waarde
    End If
    
End Sub



Sub GrootsteNegatief()

varMin = 10000000

For Each Waarde In Range("Bereik").Cells
    
    If Waarde < varMin Then
        varMin = Waarde
    End If
    
End Sub

 

[Wigi]

Zeg, just keep it simple, dit zal wel simpeler zijn voor GrootstePositief:

Function GrootstePositief(rng As Range)
    GrootstePositief = IIf(WorksheetFunction.Max(rng) < 0, "Er zijn geen positieve getallen", WorksheetFunction.Max(rng))
End Function

Wigi

 

[WinteE]

Je hebt altijd baas boven baas Wigi.

 

[Wigi]

Je hebt altijd baas boven baas Wigi.

Beide voorstellen werken goed, dus laten we de vraagsteller maar kiezen.

Goed werk trouwens. Bedankt.

Wigi