VBA Erreur 400
Lordknight
Messages postés
11
Statut
Membre
-
borntobealive Messages postés 167 Statut Membre -
borntobealive Messages postés 167 Statut Membre -
Bonjour,
Je souhaite enregistrer un fichier dans un nouveau dossier avant de l'effacer, mais au moment de l'enregistrement, l'erreur 400 apparait, est-ce que quelqu'un pourrait m'aider a comprendre?
Je souhaite enregistrer un fichier dans un nouveau dossier avant de l'effacer, mais au moment de l'enregistrement, l'erreur 400 apparait, est-ce que quelqu'un pourrait m'aider a comprendre?
Private Sub DeplaceFichier(Fichier As Workbook, Chemin As String)
Dim NomFichier As String
'Chemin = Trim(Range("h4"))
NomFichier = Fichier.Name
'Pour enregister une copie seulement
Fichier.SaveCopyAs (Chemin & NomFichier)
ActiveWorkbook.Close
Kill Fichier
End Sub
A voir également:
- Erreur 400 vba
- Erreur 4101 france tv - Forum Lecteurs et supports vidéo
- Erreur t32 ✓ - Forum Livebox
- Erreur 3000 france tv - Forum Lecteurs et supports vidéo
- Erreur upes 1025 - Forum Téléviseurs
- Erreur 0x80070643 - Accueil - Windows
3 réponses
Bonjour
regarde si "chemin" se termine par un "\"
si non
fichier.SaveCopyAs (Chemin & "\" & NomFichier)
regarde si "chemin" se termine par un "\"
si non
fichier.SaveCopyAs (Chemin & "\" & NomFichier)
