VBA - Fonction Split

Une fonction de fractionnement renvoie un tableau contenant un nombre spécifique de valeurs fractionnées en fonction d'un délimiteur.

Syntaxe

Split(expression[,delimiter[,count[,compare]]])

Description des paramètres

  • Expression- Un paramètre obligatoire. Expression de chaîne qui peut contenir des chaînes avec des délimiteurs.

  • Delimiter- Un paramètre facultatif. Le paramètre, qui est utilisé pour convertir en tableaux basés sur un délimiteur.

  • Count- Un paramètre facultatif. Le nombre de sous-chaînes à renvoyer, et s'il est spécifié comme -1, toutes les sous-chaînes sont renvoyées.

  • Compare- Un paramètre facultatif. Ce paramètre spécifie la méthode de comparaison à utiliser.

    • 0 = vbBinaryCompare - Effectue une comparaison binaire

    • 1 = vbTextCompare - Effectue une comparaison textuelle

Exemple

Ajoutez un bouton et ajoutez la fonction suivante.

Private Sub Constant_demo_Click()
   ' Splitting based on delimiter comma '$'
   Dim a as Variant
   Dim b as Variant
   
   a = Split("Red $ Blue $ Yellow","$")
   b = ubound(a)
   
   For i = 0 to b
      msgbox("The value of array in " & i & " is :"  & a(i))
   Next
End Sub

Lorsque vous exécutez la fonction ci-dessus, elle produit la sortie suivante.

The value of array in 0 is :Red 
The value of array in 1 is : Blue 
The value of array in 2 is : Yellow