Supportnet Computer
Planet of Tech

Supportnet / Forum / Tabellenkalkulation

UserForm Textfeldeingabe begrenzen





Frage

Hallo, vielleicht kann mir ja jemand helfen. Und habe ich auf einer UserForm ein Textfeld. Hier kann nur an 1. Stelle ein Buchstabe (A , B , C , D , E , G) stehen und an 2. Stelle eine Zahl von 1 bis 5 sprich am Ende Kombinationen wie A3 oder B4 .... .Andere Eingaben sind nicht möglich. Ist das mit Hilfe von VBA möglich? Vielen Dank für eine Rückantwort aus Fachkreisen. Mfg Sabine

Antwort 1 von fedjo

Hallo Sabine,
der Code blendet die UserForm aus, wenn zuerst eine Zahl eingegeben wird. Die Eingaben werden auch auf 2 Stellen begrenzt.

Private Sub TextBox1_Change()
If IsNumeric(TextBox1.Value) = True Then
UserForm2.Hide
End If
With TextBox1
If Len(.Text) > 2 Then .Text = Left$(.Text, 2)
End With
End Sub

Oder man kann die Eingaben auch auf Zahlen begrenzen.

Private Sub TextBox3_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If KeyAscii < 48 Or KeyAscii > 57 Then KeyAscii = 0
End Sub

Ich hoffe es hilft dir weiter.

Gruß
fedjo

Ich möchte kostenlos eine Frage an die Mitglieder stellen:


Ähnliche Themen:


Suche in allen vorhandenen Beiträgen: