GETSUBSTR LibreOffice Calc के लिए फ़ंक्शन

GETSUBSTR() विवरण

GETSUBSTR() फ़ंक्शन का उद्देश्य दिए गए विभाजक द्वारा पाठ के भाग का चयन करना है।

GETSUBSTR फ़ंक्शन कोड निर्दिष्ट विभाजक द्वारा पाठ को एक सरणी में विभाजित करता है और निर्दिष्ट क्रम संख्या के अनुसार दिए गए सरणी के तत्व को लौटाता है।

StarBASIC GETSUBSTR के लिए कोड

नीचे एक कस्टम फ़ंक्शन GETSUBSTR बनाने के लिए मैक्रो कोड है जो टेक्स्ट को भागों में विभाजित कर सकता है और इसके किसी भी तत्व को LibreOffice प्रोग्राम calc में पुनः प्राप्त कर सकता है।

एक नया फ़ंक्शन जोड़ने के लिए, मेनू खोलें Tools - Macros - Edit Macros..., Module1 चुनें और निम्नलिखित टेक्स्ट को मॉड्यूल में कॉपी करें:

Function GETSUBSTR(Txt, Delimiter, n) As String  
   Dim txtArray As Variant  
     
     If Txt = "" Then Exit Function
     
      txtArray = Split(Txt, Delimiter) 
      maxExt = UBound(txtArray)
      
      If n >= 0 Then 
        normExt = n - 1
      Else      
        normExt = maxExt + n + 1
      EndIf      
       
      extToFind = Max(Min(maxExt, normExt), 0)
      
      GETSUBSTR = txtArray(extToFind)
     
End Function

फिर, Macro Editor को बंद करें, LibreOffice Calc पर वापस लौटें और किसी भी सेल में नए फ़ंक्शन का उपयोग करें।

एक्सटेंशन का उपयोग करना

आप भी फीचर का इस्तेमाल कर सकते हैं GETSUBSTR() निःशुल्क एक्सटेंशन इंस्टॉल करके YouLibrecalc.oxt या इसका पूर्ण विशेषताओं वाला संस्करण YLC_Utilities.oxt .

उसके बाद, यह फ़ंक्शन उन सभी फ़ाइलों में उपलब्ध होगा जो LibreOffice Calc में खोली जाएंगी।