VBA LEN

La fonction Len est une fonction commune à la fois pour la feuille de calcul et pour VBA, c'est une fonction intégrée pour les deux plates-formes et la syntaxe pour utiliser cette fonction est également similaire, les arguments que cette fonction prend dans les deux plates-formes sont similaires, à savoir une chaîne et l'utilisation ou la sortie de cette fonction est la même qu'elle renvoie la longueur d'une chaîne.

Fonction VBA LEN

La fonction VBA LEN renvoie la «longueur de la chaîne», c'est-à-dire qu'elle renvoie le nombre de caractères présents dans la valeur fournie. De toutes les fonctions de chaîne de VBA, «LEN» est la fonction la plus sous-utilisée. J'ai vu la fonction «VBA LEN» utilisée comme fonction de support pour d'autres fonctions de chaîne comme les fonctions VBA MID et la fonction VBA RIGHT.

Comment trouvez-vous la longueur de la chaîne ou de la valeur?

Par exemple, si vous la phrase "Bonjour les gars, bonjour !!!" et vous, si vous voulez trouver le nombre de caractères, comment le trouvez-vous? Dans cet article, nous allons vous montrer la fonction «VBA LEN».

Formule de la fonction VBA LEN

La fonction LEN n'a qu'une seule syntaxe, c'est-à-dire Expression.

Une expression n'est rien d'autre que la valeur que nous essayons de tester.

Par exemple, Len («Good») renverra 4.

Exemples

Vous trouverez ci-dessous des exemples de fonction de longueur de chaîne VBA.

Exemple 1

La longueur d'une fonction VBA String est très simple à utiliser. Par exemple, regardez le code VBA ci-dessous.

Code:

 Sub LEN_Example () Dim Total_Length As String Total_Length = Len ("Excel VBA") MsgBox Total_Length End Sub 

Dans le code ci-dessus, la variable est "Total_Length".

Dim Total_Length en tant que chaîne

Pour cette variable, nous avons attribué la valeur via la fonction VBA LEN.

Total_Length = Len ("Excel VBA")

Pour la fonction LEN, nous avons attribué la valeur «Excel VBA».

Total_Length = Len ("Excel VBA")

Ensuite, nous montrons le résultat dans la boîte de message VBA.

MsgBox Total_Length

Lorsque j'exécute ce code en utilisant la touche F5 ou manuellement, nous obtenons 9 en conséquence car l'espace est également un caractère.

VBA LEN comme fonction de support

Exemple 1

Le but de la fonction LEN est principalement utilisé avec d'autres fonctions. J'ai utilisé cette fonction avec les fonctions RIGHT & Instr.

Par exemple, regardez les exemples de données ci-dessous.

À partir des données ci-dessus, nous devons extraire la date séparément et les remarques séparément. Copiez les données ci-dessus dans votre feuille Excel et collez-les dans la cellule A1.

Afin d'extraire ces éléments, nous devons utiliser la fonction LEN avec d'autres fonctions de chaîne. Le code ci-dessous fera le travail pour nous.

Code:

Sub LEN_Example1 () Dim OurValue As String Dim k As Long For k = 2 To 6 'Dans ce cas, mes données ont commencé à partir de la deuxième cellule et se terminent à la 6ème. 'En fonction de vos données, modifiez les nombres OurValue = ActiveSheet.Cells (k, 1) .Value' Ceci extraira les 10 premiers caractères, c'est-à-dire la partie Date ActiveSheet.Cells (k, 2) .Value = Left (Trim (OurValue), 10) 'Cela extraira la partie des remarques ActiveSheet.Cells (k, 3) .Value = Mid (Trim (OurValue), 11, Len (Trim (OurValue)) - 10) Next End Sub

Lorsque nous exécutons ce code manuellement ou via la touche F5, nous obtiendrons le résultat comme ci-dessous.

Exemple # 2

Maintenant, je vais vous montrer comment utiliser VBA Length of string comme une fonction de support pour extraire le nom de famille du nom complet avec la fonction RIGHT & Instr.

Pour la démonstration, regardez les données ci-dessous.

Dans la liste ci-dessus, nous devons extraire le nom de famille du nom complet. Le code ci-dessous extraira le nom de famille. LEN est ici utilisé comme fonction de support.

Code:

 Sub LEN_Example2 () Dim FullName As String Dim k As Long For k = 2 To 8 FullName = ActiveSheet.Cells (k, 1) .Value 'Ceci extraira le nom de famille ActiveSheet.Cells (k, 2) .Value = Right (FullName , Len (FullName) - InStr (1, FullName, "")) 'LEN trouve le nombre total de caractères' Instr trouve le caractère d'espace 'LEN - Inst donnera le nombre total de caractères à partir de la droite Next End Sub 

Exécutez le code à l'aide de la touche F5 ou vous pouvez exécuter manuellement et voir le résultat.

Vous pouvez télécharger cette longueur de chaîne Excel VBA ici - Modèle de fonction VBA LEN