GETSUBSTR Fonction pour LibreOffice Calc

GETSUBSTR() descriptif

La fonction GETSUBSTR() est destinée à sélectionner une partie du texte par le séparateur donné.

Le code de la fonction GETSUBSTR divise le texte en un tableau par le séparateur spécifié et renvoie l'élément du tableau donné en fonction du numéro de série spécifié.

StarBASIC Code pour GETSUBSTR

Vous trouverez ci-dessous le code de la macro pour créer une fonction personnalisée GETSUBSTR qui peut diviser le texte en parties et en récupérer n'importe quel élément dans le programme LibreOffice Calc.

Pour ajouter une nouvelle fonction, ouvrez le menu Tools - Macros - Edit Macros..., sélectionnez Module1 et copiez le texte suivant dans le module :

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

Ensuite, fermez Macro Editor, revenez à LibreOffice Calc et utilisez la nouvelle fonction dans n'importe quelle cellule.

Utiliser l'extension

Vous pouvez également utiliser la fonctionnalité GETSUBSTR() en installant l'extension gratuite YouLibreCalc.oxt ou sa version complète YLC_Utilities.oxt .

Après cela, cette fonction sera disponible dans tous les fichiers qui seront ouverts dans LibreOffice Calc.