bonjour a tous,
je voudrais ameliorer ma VBA, car petit probleme.je récupéré la musique de chevaux et je ne voudrais pas qu'il epure se q'il y a entre parenthèse exemple
Function Musique(R As Range) As String
Dim sX$
With CreateObject("vbscript.regexp"): .Global = True: .Pattern = "[^\d]+": sX = .Replace(R.Text, vbNullString): End With
Musique = sX
End Function
avec cette formule il epure comme cela : 3219 il prend ce qui et entre parenthèse
je voudrais se resultat 32 qu'il n'epure pas se qui et entre parenthèse
merci à vous
je voudrais ameliorer ma VBA, car petit probleme.je récupéré la musique de chevaux et je ne voudrais pas qu'il epure se q'il y a entre parenthèse exemple
|
Function Musique(R As Range) As String
Dim sX$
With CreateObject("vbscript.regexp"): .Global = True: .Pattern = "[^\d]+": sX = .Replace(R.Text, vbNullString): End With
Musique = sX
End Function
avec cette formule il epure comme cela : 3219 il prend ce qui et entre parenthèse
je voudrais se resultat 32 qu'il n'epure pas se qui et entre parenthèse
merci à vous