Hallo,
Ik heb met behulp van dit forum gevonden hoe ik in een userform standaard de tekst met een hoofdletter kan laten beginnen. Echter kwam ik er bij testen achter dat ik voor de rest geen hoofdletters kan gebruiken. Ook niet als ik de schift-toets gebruik. Dit is eigenlijk niet helemaal wenselijk want soms wil ik bepaalde letters in hoofdletter kunnen laten vermelden bv naam van een afkorting/of een lettercombinatie.
Kan ik met een kleine aanpassing zorgen dat alles dus wel met hoofdletter begint, maar dat ik zelf kan bepalen of er hoofdletters gebruikt mogen worden, gewoon door de shift toets te gebruiken.
Ik heb met behulp van dit forum gevonden hoe ik in een userform standaard de tekst met een hoofdletter kan laten beginnen. Echter kwam ik er bij testen achter dat ik voor de rest geen hoofdletters kan gebruiken. Ook niet als ik de schift-toets gebruik. Dit is eigenlijk niet helemaal wenselijk want soms wil ik bepaalde letters in hoofdletter kunnen laten vermelden bv naam van een afkorting/of een lettercombinatie.
Code:
Private Sub Sugsteekwoord_Change()
If Opt2 Then
cmbWijzigen.Visible = True
End If
Sugsteekwoord.Text = UCase(Left(Sugsteekwoord.Text, 1)) & LCase(Mid(Sugsteekwoord.Text, 2))
End SubKan ik met een kleine aanpassing zorgen dat alles dus wel met hoofdletter begint, maar dat ik zelf kan bepalen of er hoofdletters gebruikt mogen worden, gewoon door de shift toets te gebruiken.
