ah, par contre ça ne remplace que un seul des 2 /.
ma fonction est celle la :
Function ReplaceTest(patrn, replStr)
Dim regEx, str1' ' Crée des variables.
str1 = date
Set regEx = New RegExp ' Crée l'expression régulière.
regEx.Pattern = patrn ' Définit les critères.
regEx.IgnoreCase = true ' Ignore la casse.
ReplaceTest = regEx.Replace(str1, replStr) ' Effectue le remplacement
End Function
MsgBox(ReplaceTest("/", "-" )) ' Remplace '/' par '-'.
c'est un peu un copier coller de l'aide vbscript