Kullanıcı formundaki metin kutularının Excel'de boş olup olmadığını nasıl kontrol edebilirim?
Belirli bir kullanıcı dosyasındaki metin kutularının Excel'de boş olup olmadığını kontrol etmek istiyorsanız, bu makaledeki yöntem size yardımcı olabilir.
Kullanıcı formundaki metin kutularının boş olup olmadığını kontrol edin VBA kodu ile
Kullanıcı formundaki metin kutularının boş olup olmadığını kontrol edin VBA kodu ile
Aşağıdaki VBA kodu, belirtilen bir kullanıcı formundaki tüm metin kutularının Excel'de boş olup olmadığını kontrol etmenize yardımcı olabilir. Lütfen aşağıdaki işlemleri yapın.
1. Tuşuna basın. Ara Toplam + F11 tuşlarını açmak için Uygulamalar için Microsoft Visual Basic pencere.
2. içinde Uygulamalar için Microsoft Visual Basic Pencere, tıklayın Ekle > modül. Ardından, VBA kodunu kod penceresine kopyalayın.
VBA kodu: Kullanıcı formundaki metin kutularının boş olup olmadığını kontrol edin
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
not: Kodda, UserForm1, kontrol edeceğiniz metin kutularını içeren kullanıcı formunun adıdır.
3. Tuşuna basın. F5 kodu çalıştırmak için anahtar. Sonra bir Microsoft Excel Aşağıdaki ekran görüntüsü gibi hangi metin kutusunun boş olduğunu ve hangisinin boş olmadığını söylemek için iletişim kutusu açılır.
İlgili yazılar:
- Bir hücredeki ilk karakterin Excel'de bir harf veya sayı olup olmadığını nasıl kontrol edebilirim?
- Excel'de bir hücre değerinin iki değer arasında olup olmadığını nasıl kontrol edebilirim?
- Excel'de bir metin kutusu yüzde olarak nasıl biçimlendirilir?
- Excel'de seçildiğinde bir metin kutusunun metnini otomatik olarak nasıl seçebilirim?
En İyi Ofis Üretkenlik Araçları
Kutools for Excel ile Excel Becerilerinizi Güçlendirin ve Daha Önce Hiç Olmadığı Gibi Verimliliği Deneyimleyin. Kutools for Excel, Üretkenliği Artırmak ve Zamandan Tasarruf Etmek için 300'den Fazla Gelişmiş Özellik Sunar. En Çok İhtiyacınız Olan Özelliği Almak İçin Buraya Tıklayın...
Office Tab, Office'e Sekmeli Arayüz Getirir ve İşinizi Çok Daha Kolay Hale Getirir
- Word, Excel, PowerPoint'te sekmeli düzenlemeyi ve okumayı etkinleştirin, Publisher, Access, Visio ve Project.
- Yeni pencereler yerine aynı pencerenin yeni sekmelerinde birden çok belge açın ve oluşturun.
- Üretkenliğinizi% 50 artırır ve her gün sizin için yüzlerce fare tıklamasını azaltır!