Bonjour,

Avant, avec le code ci-dessous, je pouvais supprimer la chaine "ABCD0012345".
Or maintenant, ma cellule contient 2 fois une chaine de ce type. Du coup, c'est la première qui est supprimée au lieu de la dernière uniquement.

Sauriez-vous me dire quel petit ajustement je peux faire pour que seule la 2e et dernière chaine "ABCDxxxxxxx" soit supprimée dans ma cellule ?


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Dim regEx As Object
        Dim strInputs As Variant
        Dim strInput, strOutput As String
            strInputs = Array(ActiveCell.Offset(0, 3).Value)
            Set regEx = CreateObject("VBScript.RegExp")
 
            regEx.Pattern = "ABCD[0-9]{7}"
 
            For Each strInput In strInputs
                    strOutput = regEx.Replace(strInput, "")
                    ActiveCell.Offset(0, 3).Value = strOutput
            Next
Merci à tous pour votre aide,
Laurent