Comment obtenir uniquement la partie numérique d’une chaîne dans Excel
Si vous souhaitez extraire uniquement la partie numérique ou uniquement la partie texte d’une chaîne, vous pouvez créer une fonction personnalisée dans VBA.
Vous pouvez ensuite utiliser cette fonction VBA dans la feuille de calcul (tout comme les fonctions Excel normales) et elle n’extrairea que la partie numérique ou textuelle de la chaîne.
Vous trouverez ci-dessous le code VBA qui créera une fonction pour extraire la partie numérique d’une chaîne :
‘Ce code VBA créera une fonction pour obtenir la partie numérique d’une chaîne
Function GetNumeric(CellRef As String) Dim StringLength As Integer StringLength = Len(CellRef) For i = 1 To StringLength If IsNumeric(Mid(CellRef, i, 1)) Then Result = Result & Mid(CellRef, i, 1) Next i
Vous avez besoin de placer du code dans un module, puis vous pouvez utiliser la fonction = GetNumeric dans la feuille de calcul.
Cette fonction ne prendra qu’un seul argument, qui est la référence de cellule de la cellule à partir de laquelle vous souhaitez obtenir la partie numérique.
De même, ci-dessous se trouve la fonction qui vous permettra d’obtenir uniquement la partie texte d’une chaîne dans Excel :
‘Ce code VBA créera une fonction pour obtenir la partie texte d’une chaîne
Function GetText(CellRef As String) Dim StringLength As Integer StringLength = Len (CellRef) For i = 1 To StringLength If Not (IsNumeric(Mid(CellRef, i, 1))) Then Resuit = Resuit & Mid(CellRef, i, 1) Ne x t i