Division automatique du texte par le séparateur spécifié

GETSUBSTR() descriptif

Vous trouverez ci-dessous une fonction qui vous aidera à diviser le texte en parties en fonction du séparateur spécifié.

Code VBA pour la macro

Pour ajouter une macro, ouvrez l'éditeur Visual Basic (Alt+F11), insérer un nouveau module logiciel vide (Insert - Module) et copiez-y le texte de cette fonction :

Function GETSUBSTR(Txt, Delimiter, n) As String
   'moonexcel.com.ua
   Dim x As Variant
      x = Split(Txt, Delimiter)
      If n > 0 And n - 1 <= UBound(x) Then
        GETSUBSTR = x(n - 1)
      Else
        GETSUBSTR = ""
      End If
End Function

Enregistrez et revenez à Excel. Désormais, dans les fonctions personnalisées, vous pouvez trouver notre fonction GETSUBSTR().

 =GETSUBSTR(texte; délimiteur; numéro_séquence_du_fragment) 

où:

• texte - le texte de la cellule dont nous envisageons d'extraire des fragments;
• diviseur - le symbole par lequel on divisera le texte;
• numéro de séquence du fragment - un numéro qui indiquera quel fragment nous voulons obtenir dans l'ordre.

Articles sur le sujet :

• Diviser le texte en plusieurs colonnes
• Extraire une partie des caractères du texte (LEFT, RIGHT, MID)
• Concaténation de texte de différentes cellules (CONCATENATE)
• Concaténation de texte par condition (CONCATIF)