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

Maximale waarde TextBoxen

Status
Niet open voor verdere reacties.
G

gbvdh

Gebruiker
Lid geworden
14 feb 2007
Berichten
111
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
 
Gebruik de maximum functie in VBA, MAX afgekort. De argumenten in de functie zijn de verschillende tekstboxen.
 
Als ik het volgende in voer:
Code: 
TextBox22 = Max(TextBox15, TextBox16, TextBox17)

Krijg ik de error:
Compileerfout

Sub of Function is niet gedefineerd
 
Code: 
TextBox22 = WorksheetFunction.Max(TextBox15, TextBox16, TextBox17)
 
Het spijt me zeer, maar ook dit lijkt niet te werken
 
Wat staat er in de tekstboxen die je wilt optellen?

Hang er overal eens

Code: 
.Value

aan vast.
 
Had ik inderdaad ook al even geprobeerd maar ook dat werkt niet
 
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
 

Bijlagen

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

Je maakt er een Double variabele van.
 
?

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.
 
Laatst bewerkt:
Zo is het inderdaad opgelost, ik wou nog vragen wat de Double dan in is maar dat is inmiddels ook al beantwoord. Dank u.
 
Status
Niet open voor verdere reacties.
                    Steun ons                    

Nieuwste berichten

Terug
Bovenaan Onderaan