Cette fonction renvoit le masque en second paramètre, dans lequel les caractères non présents dans la plage en premier paramètre sont remplacés par le troisième paramètre.

 1Function ReplaceMissingCharacters(range As Range, pattern As String, replacement As String) As String
 2    Dim car As String
 3    Dim i As …