Enrigistrer fichier excel dans dossier en vba
Résolu/Fermé
gnioler
Messages postés
88
Date d'inscription
mercredi 5 octobre 2011
Statut
Membre
Dernière intervention
7 janvier 2015
-
26 oct. 2011 à 13:21
gnioler Messages postés 88 Date d'inscription mercredi 5 octobre 2011 Statut Membre Dernière intervention 7 janvier 2015 - 27 oct. 2011 à 23:29
gnioler Messages postés 88 Date d'inscription mercredi 5 octobre 2011 Statut Membre Dernière intervention 7 janvier 2015 - 27 oct. 2011 à 23:29
A voir également:
- Vba enregistrer un fichier excel dans un dossier
- Fichier rar - Guide
- Le fichier à télécharger est la nouvelle note de service de votre entreprise. importez ce fichier dans le bon dossier sur l'espace pix cloud. donnez à ce fichier les mêmes droits d'accès que les autres notes de service. ✓ - Forum Windows
- Comment réduire la taille d'un fichier - Guide
- Liste déroulante excel - Guide
- Comment ouvrir un fichier epub ? - Guide
10 réponses
lermite222
Messages postés
8702
Date d'inscription
dimanche 8 avril 2007
Statut
Contributeur
Dernière intervention
22 janvier 2020
1 190
Modifié par lermite222 le 26/10/2011 à 16:14
Modifié par lermite222 le 26/10/2011 à 16:14
bonjour,
Un début à adapter..
A+
Si tu te cognes à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius)
NOTE : Je ne répond pas aux MP pour les questions techniques.
Un début à adapter..
Sub SauverClasseur()
Dim Chemin As String
Dim Fich As String
With Sheets("NomDeLaFeuille")
If .Range("E13") <> "" Then
Chemin = "C:\Repertoire\Repertoire\" & .Range("E13") & "\"
Else
Chemin = "C:\Repertoire\Repertoire\a classer\"
End If
End With
With ThisWorkbook
Fich = .Name
.SaveAs (Chemin & Fich)
End With
End Sub
A+
Si tu te cognes à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius)
NOTE : Je ne répond pas aux MP pour les questions techniques.
