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

Textbox in userform vullen met berekening over andere textbox in userform

Status
Niet open voor verdere reacties.

Peenvogel

Gebruiker
Lid geworden
5 mei 2015
Berichten
129
Ik heb een vraag.
In het bijgevoegde excelletje heb ik een userform gemaakt , die aangeroepen kan worden op het tweede tabblad.
Daarin heb ik een Omschrijvingstekstbox genaamd Tekstbox_RVO1, die de gebruiker met maximaal 522 tekens kan vullen.

Daarnaast heb ik de tekstbox TextBox_VO neergezet.
Ik dacht in een Private sub met eigenschap AfterUpdate de lengte van de getypte
tekst in Textbox_RVO1 te laten berekenen en die waarde van 522 af te trekken en die in Tekstbox_VO
ernaast te laten weergegeven, zodat de gebruiker kan zien hoeveel tekst er nog getypt kan worden.
Bv: de gebruiker typt een redelijke hoeveelheid tekst en klikt even in Tekstbox_VO zodat
dan daarin te zien is hoeveel tekens er nog in Textbox_RVO1 kan.

Ik heb voor TextBox_RVO1 de eigenschap Wordwrap aangezet.
Als er echter tekst wordt getypt, blijft de tekst op 1 regel staan en schuift de eerder getypte tekst uit beeld.
Weet iemand of het mogelijk is om wel een wordwrap te bereiken?

Met vriendelijke groet,

Peenvogel.
 

Bijlagen

  • voorforum.xlsm
    37,6 KB · Weergaven: 33
Zet dit erbij om het resterende aantal tekens te tonen:
Code:
Private Sub TextBox_RVO1_Change()
    TextBox_VO.Text = TextBox_RVO1.MaxLength - Len(TextBox_RVO1.Text)
End Sub
Zet van de Omschrijving box EnterKeyBehavior en Multiline op True.
 
Laatst bewerkt:
M'n vorige post heb ik net nog iets aangepast.
 
Dank je Ed :D, ik had het zelf ook aangepast, maar iets minder mooi dan jij.

Groetjes, Peenvogel
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan