वीबीए: यह जांचने के लिए कि सेल टेक्स्ट है या नहीं, istext का उपयोग कैसे करें
यह जांचने के लिए कि किसी दिए गए सेल में टेक्स्ट है या नहीं, आप VBA में IsText विधि का उपयोग कर सकते हैं।
यदि किसी दिए गए सेल का मान टेक्स्ट के रूप में पहचाना जाता है तो यह फ़ंक्शन True लौटाएगा।
अन्यथा, फ़ंक्शन False लौटाएगा।
इस फ़ंक्शन को व्यवहार में उपयोग करने का एक सामान्य तरीका यहां दिया गया है:
SubCheckText ()
Dim i As Integer
For i = 1 To 9
If IsText(Range(" A " & i)) = True Then
Range(" B " & i) = " Cell is Text "
Else
Range(" B " & i) = " Cell is Not Text "
End If
Next i
End Sub
यह विशेष मैक्रो जाँच करेगा कि A1:A9 श्रेणी में प्रत्येक कक्ष टेक्स्ट है या नहीं।
यदि कोई सेल टेक्स्ट है, तो “सेल टेक्स्ट है” श्रेणी B1:B9 में संबंधित सेल में लौटाया जाएगा।
यदि कोई सेल टेक्स्ट नहीं है, तो इसके बजाय “सेल टेक्स्ट नहीं है” लौटाया जाएगा।
निम्नलिखित उदाहरण दिखाता है कि व्यवहार में इस वाक्यविन्यास का उपयोग कैसे करें।
उदाहरण: VBA में IsText का उपयोग कैसे करें
मान लीजिए कि हमारे पास Excel में मानों का निम्नलिखित कॉलम है:
मान लीजिए हम यह जांचना चाहते हैं कि कॉलम ए में प्रत्येक सेल टेक्स्ट है या नहीं।
ऐसा करने के लिए हम निम्नलिखित मैक्रो बना सकते हैं:
SubCheckText ()
Dim i As Integer
For i = 1 To 9
If IsText(Range(" A " & i)) = True Then
Range(" B " & i) = " Cell is Text "
Else
Range(" B " & i) = " Cell is Not Text "
End If
Next i
End Sub
जब हम इस मैक्रो को चलाते हैं, तो हमें निम्नलिखित आउटपुट प्राप्त होता है:
कॉलम बी आउटपुट प्रदर्शित करता है जो हमें बताता है कि कॉलम ए में प्रत्येक मिलान सेल को टेक्स्ट के रूप में पहचाना गया है या नहीं।
ध्यान दें कि टेक्स्ट और संख्या दोनों वाले सेल को टेक्स्ट के रूप में पहचाना जाता है।
किसी सेल को संख्या के रूप में पहचाने जाने के लिए, उसमें केवल संख्याएँ होनी चाहिए।
नोट : आप VBA IsText फ़ंक्शन के लिए संपूर्ण दस्तावेज़ यहां पा सकते हैं।
अतिरिक्त संसाधन
निम्नलिखित ट्यूटोरियल बताते हैं कि वीबीए में अन्य सामान्य कार्य कैसे करें:
वीबीए में स्ट्रिंग को इंट में कैसे बदलें
वीबीए में एक स्ट्रिंग को डबल में कैसे बदलें
कैसे जांचें कि एक स्ट्रिंग में वीबीए में एक और स्ट्रिंग है या नहीं