Dans cet article, nous allons apprendre à créer une fonction définie par l’utilisateur pour extraire le texte uniquement de la chaîne via VBA.

Fonction définie par l’utilisateur: Microsoft Excel vous permet de créer votre propre fonction selon l’exigence, nous l’appelons fonction définie par l’utilisateur. Et, nous pouvons utiliser les fonctions définies par l’utilisateur comme d’autres fonctions fonctionnent dans Excel.

Comprenons avec un exemple très simple:

Nous avons une plage de chaînes, à partir de laquelle nous voulons uniquement récupérer la valeur de texte uniquement.

image 1

Pour récupérer uniquement du texte, nous allons créer le code VBA. Grâce à ce code, nous pouvons récupérer le texte de n’importe quel endroit de la cellule. Voir la procédure et le code ci-dessous, vous comprendrez à quel point c’est facile:

Ouvrez la page VBA appuyez sur la touche Alt + F11 Insérez un module * Écrivez le code mentionné ci-dessous:

Function TextVba(entry)

For I = 1 To Len(entry)

ThisChar = Mid(entry, I, 1)

Select Case Asc(ThisChar)

Case 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58

Case Else

TextVba = TextVba & ThisChar

End Select

Next i

End Function

Explication du code: Tout d’abord, nous avons donné le nom de la fonction (TextVba).

Et, ensuite, nous avons donné la longueur de la chaîne, puis nous avons utilisé la fonction Asc (c’est la fonction de code). Ensuite, nous avons défini le cas. Maintenant, nous avons défini la condition de TextVba, puis Fermer la fonction de sélection.

Maintenant, nous allons utiliser la fonction dans la feuille Excel Aller à la feuille Excel Dans la cellule B2 entrez la formule = TextVba (A2), appuyez sur Entrée * La fonction ne renverra que du texte

image 2

De cette façon, nous pouvons créer une fonction définie par l’utilisateur et économiser notre temps des activités régulières.

image 48

Si vous avez aimé nos blogs, partagez-les avec vos amis sur Facebook. Et vous pouvez aussi nous suivre sur Twitter et Facebook.

Nous serions ravis de vous entendre, faites-nous savoir comment nous pouvons améliorer, compléter ou innover notre travail et le rendre meilleur pour vous. Écrivez-nous à [email protected]