Jak sprawdzić, czy pola tekstowe w formularzu użytkownika są puste, czy nie w programie Excel?
Jeśli chcesz sprawdzić, czy pola tekstowe w określonym pliku użytkownika są puste, czy nie w programie Excel, może Ci pomóc metoda opisana w tym artykule.
Sprawdź, czy pola tekstowe w formularzu użytkownika są puste, czy nie z kodem VBA
Sprawdź, czy pola tekstowe w formularzu użytkownika są puste, czy nie z kodem VBA
Poniższy kod VBA może pomóc Ci sprawdzić, czy wszystkie pola tekstowe w określonym formularzu użytkownika są puste, czy nie w programie Excel. Wykonaj następujące czynności.
1. wciśnij inny + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.
2. w Microsoft Visual Basic for Applications okno, kliknij wstawka > Moduł. Następnie skopiuj poniższy kod VBA do okna kodu.
Kod VBA: sprawdź, czy pola tekstowe w formularzu użytkownika są puste, czy nie
Sub CheckTextBox()
Dim fTextBox As Object
Dim xTxtName As String
Dim xEptTxtName As String
For Each fTextBox In UserForm1.Controls
If TypeName(fTextBox) = "TextBox" Then
If fTextBox.Text = "" Then
xEptTxtName = xEptTxtName & fTextBox.Name & " is empty" & vbNewLine
Else
xTxtName = xTxtName & fTextBox.Name & " is not empty" & vbNewLine
End If
End If
Next
If xEptTxtName <> "" Or xTxtName <> "" Then
MsgBox xEptTxtName & vbNewLine & xTxtName
End If
End Sub
Note: W kodzie UserForm1 to nazwa formularza użytkownika zawierającego pola tekstowe, które będziesz sprawdzał.
3. wciśnij F5 klucz do uruchomienia kodu. Następnie Microsoft Excel wyskakuje okno dialogowe z informacją, które pole tekstowe jest puste, a które nie, jak pokazano na zrzucie ekranu.
Podobne artykuły:
- Jak sprawdzić, czy pierwszy znak w komórce to litera lub cyfra w programie Excel?
- Jak sprawdzić, czy wartość komórki znajduje się między dwiema wartościami w programie Excel?
- Jak sformatować pole tekstowe jako procent w programie Excel?
- Jak automatycznie zaznaczyć tekst pola tekstowego, gdy jest on wybrany w programie Excel?
Najlepsze narzędzia biurowe
Zwiększ swoje umiejętności Excela dzięki Kutools for Excel i doświadcz wydajności jak nigdy dotąd. Kutools dla programu Excel oferuje ponad 300 zaawansowanych funkcji zwiększających produktywność i oszczędzających czas. Kliknij tutaj, aby uzyskać funkcję, której najbardziej potrzebujesz...
Karta Office wprowadza interfejs z zakładkami do pakietu Office i znacznie ułatwia pracę
- Włącz edycję i czytanie na kartach w programach Word, Excel, PowerPoint, Publisher, Access, Visio i Project.
- Otwieraj i twórz wiele dokumentów w nowych kartach tego samego okna, a nie w nowych oknach.
- Zwiększa produktywność o 50% i redukuje setki kliknięć myszką każdego dnia!