XL 2010 Vba Soucis dans mon Code pour caractères spéciaux

[MuscatMimi]

Bonsoir a tous le forum
Je joins un code qui fonctionne normalement,mais je viens de l'inclure dans un autre fichier crée
et dans ce fichier il y a deux cellule qui comporte des caractères spéciaux

Exemple : N° 15,,,dans une cellule
et N° Série dans une autre,et Excel, n'aime pas a l'enregistrement
Si quelqu'un a une idée,elle sera bien venue

Bonne soirée et très bonne fêtes

'Enregistrement Zone 1
Sub Enregistrer1()
Dim Nom As String, Numero As String, Fact As String, Client As String, fichier As String, Dest As String, Fa As String, Chantier As String
Dim obj As OLEObject
Dim wk As Workbook
Dest = Sheets("MailDepannage").Range("I23") 'chemin du fichier
Fa = Range("C23") 'N°du dossier
Client = Range("F4") 'objet
Numero = Range("C21") 'nom du fichier a enregistrer

Dim Utilisateur As Variant
Utilisateur = Environ("UserName")

If Dir(Dest, vbDirectory) = "" Then MkDir Dest
fichier = Dest & "\" & Fa & "\" & " " & Client & " " & Numero & ".xls"
If Dir(fichier) <> "" Then
    If MsgBox("le fichier existe déjà !" & vbCrLf & "Le remplacer ?", vbYesNo) = vbNo Then 'rep =

    Exit Sub '(1)
    Else: GoTo Enregistrer '(1)
    End If '(1)
Else: GoTo Enregistrer '(1)
End If
Enregistrer:

   Sheets("MailDepannage").Copy
        
        Application.DisplayAlerts = False
        Application.ActiveWorkbook.SaveAs fichier ' Enregistre ce Classeur
        Application.ActiveWorkbook.Close 'Ferme le classeur sauvegarder et laise l'original ouvert
        Application.DisplayAlerts = True

 End Sub

 

[herve62]

Bonsoir
Truc tout bête , je viens de tester une partie et de planter aussi, si tu mettais ".xlsm" à la fin de ta variable fichier ? et aussi ajoute au début
dim fichier as string , car avec "C:\DATA\N°1\N°15 25" en .xlsm tout est Ok
Après je n'ai pas ton fichier et donc ???

 

[MuscatMimi]

Salut Hervé62,et a tous le Forum
Résolu
J'ai trouvé mon erreur,le Nom du Dossier de destination n'était pas écrit de la même façon que celui de ma cellule
j'avais inversé le c et le h,nul je suis ,m'en suis même pas rendu compte
Par contre pour ce qui es de xlsm,impossible de l'enregistrer sous cette extension,bref,pas grave,j'ai pas besoin du code dans le fichier sauvegardé
Bon réveillon, et très bonne année 2020 a tous
Christian
Longue vie a ce Forum