Comment sauver un fichier dont le nom se trrouve dans une cellull

Le
bozo
J'essaie de sauver un fichier dont le nom se trouve dans une cellule que j'ai
nommer fichier, mais je n'y arrive pas.
Merci de vos conseils
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Daniel.j
Le #4745101
Bonjour

Sub NomClasseur()
Dim Chr As String 'déclare la variable
Chr = Range("fichier")
ChDrive "C" 'si C n'est pas le disque par défaut
ChDir "C:ajeter" ' a modifier
ActiveWorkbook.SaveAs Filename:=(Chr)
End Sub

http://dj.joss.free.fr/fichier.htm

--
Daniel
FAQ MPFE
http://dj.joss.free.fr/faq.htm

VBAXL
http://dj.joss.free.fr/


"bozo"
J'essaie de sauver un fichier dont le nom se trouve dans une cellule que
j'ai
nommer fichier, mais je n'y arrive pas.
Merci de vos conseils



Publicité
Poster une réponse
Anonyme