फ़ंक्शन VBA: InStr

विवरण

VBA INSTR फ़ंक्शन वर्ण स्ट्रिंग में मान की पहली पाई गई स्थिति के अनुरूप एक पूर्णांक देता है (या यदि कोई मिलान नहीं मिलता है तो 0)।

सिंटैक्स INSTR

InStr(प्रारंभ_स्थिति, पाठ, खोज_मूल्य)

या

InStr(start_position, text, search_value, केस)

उदाहरण VBA InStr

"एक्सेल" शब्द की स्थिति निर्धारित करने के लिए InStr फ़ंक्शन का उपयोग करना (साइट नाम के अक्षर 1 से खोज शुरू करना):

Sub InStrExample1()  
      
    sitename = "www.moonexcel.com.ua"  
    
    'sitename में "एक्सेल" शब्द की स्थिति
    position = InStr(1, sitename, "excel")  
      
    MsgBox position 'रिटर्न: 9
    
End Sub

शब्द "EXCEL" की स्थिति जानने के लिए InStr फ़ंक्शन का उपयोग करना (इस बार मामले को अनदेखा करने के लिए चौथे तर्क में "1" का मान जोड़ना):

Sub InStrExample2()  
      
    sitename = "www.moonexcel.com.ua"  
      
    'sitename में "EXCEL" शब्द की स्थिति (केस असंवेदनशील)
    position = InStr(1, sitename, "EXCEL", 1)  
      
    MsgBox position 'रिटर्न: 9
      
End Sub  

जांचें कि क्या पाठ में कोई मान है

InStr फ़ंक्शन का उपयोग यह निर्धारित करने के लिए भी किया जा सकता है कि साइट नाम में खोज स्ट्रिंग है या नहीं:

Sub InStrExample3()
    
    sitename = "www.moonexcel.com.ua"
    
    If InStr(1, sitename, "excel") > 0 Then
       MsgBox "इसलिए!"
    End If
    
End Sub

इस उदाहरण में, यदि स्थिति मिल जाती है, तो फ़ंक्शन 0 से अधिक संख्या लौटाता है और एक संवाद बॉक्स प्रदर्शित करता है।