Maximale waarde TextBoxen

[gbvdh]

Goedendag,

Ik heb deze vraag ook al op het VBA forum geplaatst, maar daar wordt er nog niet echt fanatiek op gereageerd, daarom ook nog maar een keertje hier in de hoop dat jullie mij misschien kunnen helpen.

Is er in VB een code om de maximale waarde uit een aantal textboxen te bepalen?
Tot op heden kan ik alleen if then structuren vinden, maar dat werkt niet echt fijn omdat ik vrij veel textboxen heb.

Barry

 

[Wigi]

Gebruik de maximum functie in VBA, MAX afgekort. De argumenten in de functie zijn de verschillende tekstboxen.

 

[gbvdh]

Als ik het volgende in voer:

TextBox22 = Max(TextBox15, TextBox16, TextBox17)

Krijg ik de error:
Compileerfout

Sub of Function is niet gedefineerd

 

[Wigi]

TextBox22 = WorksheetFunction.Max(TextBox15, TextBox16, TextBox17)

 

[gbvdh]

Het spijt me zeer, maar ook dit lijkt niet te werken

 

[Wigi]

Wat staat er in de tekstboxen die je wilt optellen?

Hang er overal eens

.Value

aan vast.

 

[gbvdh]

Had ik inderdaad ook al even geprobeerd maar ook dat werkt niet

 

[Wigi]

Bestandje bijhangen, eerst zippen, aub.

 

[gbvdh]

Aste, het is wel noodzakelijk een tijd in de vullen. Zelf pak ik altijd 3 min, de berekeningen daarvoor staan onder aan in het excel bestand

 

[Wigi]

TextBox22 = WorksheetFunction.Max(CDbl(TextBox15), CDbl(TextBox16), CDbl(TextBox17))

Je maakt er een Double variabele van.

 

[Demeter]

?

Zie dat TextBox 16 en 17 het zelfde zijn, hier loopt hij ook op vast.
Maar wat doet de CDbl functie (staat niet in mijn help)?

Ik post dit bericht en ineens komt het woord Double mij bekend voor.
De dubbelen worden vermeden.

 

[gbvdh]

Zo is het inderdaad opgelost, ik wou nog vragen wat de Double dan in is maar dat is inmiddels ook al beantwoord. Dank u.

 

[Wigi]

Zo is het inderdaad opgelost, ik wou nog vragen wat de Double dan in is maar dat is inmiddels ook al beantwoord. Dank u.

RTFM

(niet slecht bedoeld he, die zijn gewoon heel leerzaam)