Beperking in textbox

[Spiderman]

Hoi toverkamp,

Hoe bedoel je minimale lengte aangeven:

 

[toverkamp]

Ik heb nu in een VBA-code staan dat het maximum aantal tekens 10 is (bij telefoonnummer). Het minimum aantal tekens is ook 10, maar ik weet niet of dit mogelijk is in excel.

 

[Spiderman]

Hoi toverkamp,

Het kan eraan liggen dat ik je niet begrijp, maar dat antwoord had ik je toch al gegeven

Hoi toverkamp,

Nee minimale lengte is onmogelijk. Je kan niet zeggen dat er minimaal 2 karakters in moeten staan, omdat als je begint is deze leeg.

Met onderstaande code controleer je dus de minimale invoer:

Code:
If Len(TextBox1.Text) = 2 Then
MsgBox "De tekst in 2 lang"
End If

Verander de 2 in 10, en je hebt je check of je textbox 10 karakter is

 

[toverkamp]

Spiderman, je begrijpt met goed, maar ik had gehoop dat het ook zonder een msbox kan, net zoals de maximum lengte. Net zoals dit:

Private Sub UserForm_Activate()
    textbox1.MaxLength = 10
End Sub

Maar als ik het goed begrijp is dit dus niet mogelijk. In ieder geval hardstikke bedankt voor uw hulp!

 

[Spiderman]

Hoi toverkamp,

Ik heb eventjes een voorbeeldje gemaakt. (zie bijlage)

Die messagebox was puur als voorbeeld. De IF THEN ervoor niet.

Eventjes een klein voorbeeldje ter visualisatie.

Als ik een emmer water wil vullen laten we zeggen van 10 liter, dan kan ik dus zeggen MaxLiters = 10. Ik kan nooit zeggen MinLiters = 10 want dan zou je dus dit krijgen.

Als liters >= MinLiters and Liters <= MaxLiters dan doe wat je doen moet

Dit gaat dus nooit. Op het moment dat ik begin met vullen is liters 0. Dus Liters >= Minliters is niet waar, want Liters moet 10 zijn om TRUE te zijn.

Snappie

 

[toverkamp]

Oké spiderman, ik snap het! Super bedankt hier kan ik wat mee:thumb: