एक्सेल: कैसे जांचें कि वीबीए के साथ कोई सेल खाली है या नहीं?

Question

संभव डुप्लिकेट:
Using VBA to check if below cell is empty

VBA के रूप में चेक के माध्यम से एक सेल विशिष्ट जानकारी के साथ दूसरे से रिक्त है तो क्या होगा? उदाहरण: यदि ए: ए = "उत्पाद विशेष" और बी: बी शून्य है तो सी 1 = "उत्पाद विशेष" यह सिर्फ एक विचार है।

और रेंज पर प्रत्येक के लिए कैसे उपयोग करें। और मूल्य को दूसरे सेल में वापस कर दें?

Answer 1

This साइट isEmpty() विधि का उपयोग करती है।

संपादित करें: यूआरएल अमान्य होने से पहले साइट से पकड़ा गया सामग्री।

Worksheets("Sheet1").Range("A1").Sort _ 
    key1:=Worksheets("Sheet1").Range("A1") 
Set currentCell = Worksheets("Sheet1").Range("A1") 
Do While Not IsEmpty(currentCell) 
    Set nextCell = currentCell.Offset(1, 0) 
    If nextCell.Value = currentCell.Value Then 
     currentCell.EntireRow.Delete 
    End If 
    Set currentCell = nextCell 
Loop 

पहले चरण में शीट 1 के पहले कॉलम में डेटा सॉर्ट किया जाएगा। दूसरे चरण में, उसी डेटा के साथ सभी पंक्तियां हटा दी जाएंगी।

... 
Set rRng = Sheet1.Range("A10") 
If IsEmpty(rRng.Value) Then ... 

निम्नलिखित आप भी इस्तेमाल कर सकते हैं:

Answer 2

आप IsEmpty() समारोह इस तरह इस्तेमाल कर सकते हैं

If ActiveCell.Value = vbNullString Then ... 

मैं एक VBA प्रोग्रामर ताकि आप मन नहीं होगा नहीं कर रहा हूँ ?!

आशा है कि यह मदद करता है

Answer 3

IsEmpty() कि जांच करने के लिए तेज तरीका होगा।

IsNull() इसी तरह के समाधान की तरह प्रतीत होता है, लेकिन ध्यान रखें कि नल को सेल को असाइन किया जाना चाहिए; यह मूल रूप से सेल में नहीं बनाया गया है।

count()

counta()

Len(range("BCell").Value) = 0