|
|
| Тема |
 combobox... |
|
| Автор |
drosg (новак) |
|
| Публикувано | 11.01.11 16:52 |
|
|
|
Здравейте и за много години !
Да попитам едно въпросче, защо когато стартирам кода ,все ми изписва грешна парола, каде бъркам ?
Прилагам въпросния код
Private Sub CommandButton1_Click()
'дефинира променлива за брояч
For j = 1 To 15
If ComboBox1.Value = Sheets("оператори").Cells(j, 2) And TextBox2.Text = Sheets("оператори").Cells(j, 1) Then
UserForm2.Hide
Else
MsgBox "Грешна парола!", vbCritical, "Грешна парола!": Exit Sub
End If
Next j
End Sub
| |
| |
| 
|
|
