Am un userform cu multipage pe el si mai multe textbox-uri. In textbox1 am o restrictie sa se scrie un numar sau "FN", functioneaza dar in momentrul cand apas pe butonul creat pentru iesire din userform cu comanda "Unload Me" imi apare mesajul de restrictie creat pentru textbox1. Am incercat sa scriu valoarea 1 la iesire din formular dar nu o ia. Trebuie sa scriu eu o valoare in textbox si apoi sa apas butonul de iesire. As vrea sa gasesc o varianta sa ies fara sa fiu nevoit sa mai scriu o valoare in textbox-ul respectiv. Aveti vre-o idee?
Multumesc anticipat pentru orice sugestie
Cod: Selectaţi tot
Private Sub TextBox1_Change()
TextBox1.Value = UCase(TextBox1.Value)
End Sub
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Not IsNumeric(TextBox1.Value) And TextBox1.Value <> "FN" Then
''TextBox1.BackColor = &HFF00&
MsgBox "Atentie!!! Se scrie doar FN sau numar mare"
TextBox1.Value = ""
Cancel = True
''TextBox1.SetFocus
''Else
''TextBox1.BackColor = &H80000005
End If
End Sub
Private Sub CommandButton1_Click()
Unload Me
End Sub