Kako preveriti, ali so besedilna polja v uporabniški obliki prazna ali ne v Excelu?
Če želite preveriti, ali so besedilna polja v določenem uporabniku v Excelu prazna ali ne, vam lahko pomaga metoda v tem članku.
Preverite, ali so besedilna polja v uporabniški obliki prazna ali ne s kodo VBA
Preverite, ali so besedilna polja v uporabniški obliki prazna ali ne s kodo VBA
Spodnja koda VBA vam lahko pomaga preveriti, ali so vsa besedilna polja v določenem uporabniškem obrazcu prazna ali ne v Excelu. Naredite naslednje.
1. Pritisnite druga + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.
2. V Ljubljani Microsoft Visual Basic za aplikacije okno, kliknite Vstavi > Moduli. Nato kopirajte spodnjo kodo VBA v okno s kodo.
Koda VBA: Preverite, ali so besedilna polja v uporabniški obliki prazna ali ne
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
Opombe: V kodi je UserForm1 ime uporabniškega obrazca, ki vsebuje besedilna polja, ki jih boste preverili.
3. Pritisnite F5 tipko za zagon kode. Potem a Microsoft Excel prikaže se pogovorno okno, ki vam pove, katero besedilno polje je prazno in katero ni prazno, kot je prikazano na spodnji sliki.
Sorodni članki:
- Kako preveriti, ali je prvi znak v celici črka ali številka v Excelu?
- Kako preveriti, ali je vrednost celice med dvema vrednostma v Excelu?
- Kako oblikovati besedilno polje v odstotkih v Excelu?
- Kako samodejno izbrati besedilo v besedilnem polju, ko je izbrano v Excelu?
Najboljša pisarniška orodja za produktivnost
Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa. Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...
Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo
- Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
- Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
- Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!