GETSUBSTR LibreOffice の関数 Calc

GETSUBSTR() 説明

GETSUBSTR() 関数は、指定された区切り文字によってテキストの一部を選択することを目的としています。

GETSUBSTR 関数コードは、指定された区切り文字によってテキストを配列に分割し、指定されたシリアル番号に従って指定された配列の要素を返します。

BASIC GETSUBSTR のコード

以下は、テキストを部分に分割し、その要素を LibreOffice Calc で取得できるカスタム関数 GETSUBSTR を作成するマクロ コードです。

新しい関数を追加するには、メニュー 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 に戻り、任意のセルで新しい関数を使用します。

YouLibreCalc 拡張機能の使用

拡張子「」を設定することで、GETSUBSTR() 関数を使用することもできます。 YouLibreCalc.oxt その後、この関数は LibreOffice Calc で開かれるすべてのファイルで使用できるようになります。