Supportnet Computer
Planet of Tech

Supportnet / Forum / Tabellenkalkulation

Großbuchstaben in Textbox/Userform





Frage

Hallo Leute Gibt es eine Möglichkeit eine Textbox in einer Userform so zu programmieren, das sie nur Großbuchstaben nimmet? Beispiel: Ich schreibe [b]1rj01[/b] und in der Textbox soll [b]1RJ01[/b] stehen. Ist das möglich??? Gruß Kaleun

Antwort 1 von Michael

Ja, es ist möglich.
Hier der Code für die Textbox1:
In der Userform sind ein Textfeld,
zwei CommandButton.
Einer ist nur dazu da, umd das Ergebnis sehen zu können.
--------------Code-------------
Option Explicit
Dim text As String ' text übernimmt den _ Inhalt aus der Textbox

Private Sub CommandButton1_Click()
UserForm1.Hide 'Form ausblenden
End Sub

Private Sub TextBox1_AfterUpdate()

text = Me.TextBox1.text
'Übergabe des Inhalts aus der Textbox _ an die Variable

Me.TextBox1 = Format(text, ">")

'Das _ eigentliche Format, alles in GROß _ durch ">", soll alles in klein sein, _ dann "<" verwenden
End Sub
--------ENDE------------------

Alles in VBA F11, Codeansicht

Antwort 2 von Kaleun

@Michael

funktioniert prima

Danke

Kaleun