enregistrement

Patrick · 6 Novembre 2003

bonjour,
je ne trouve pas la bonne syntaxe pour enregistrer un fichier et l'enregistre toujours ou celui-ci est ouvert au départ alors que je veux le mettre dans un répertoire du disque dur.
voici ma syntaxe pour l'instant

nomsauvegarde = InputBox("Entrer le nom du fichier : ")

ChDir "c:\comparaison " 'répertoire ou le fichier sera sauvegardé

ActiveWorkbook.SaveAs Filename:= _
nomsauvegarde _
, FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False

Gandalf · 6 Novembre 2003

Corrige ton programme comme ceci :

nomsauvegarde = InputBox("Entrer le nom du fichier : ")

ChDir "c:\comparaison\" 'répertoire ou le fichier sera sauvegardé

ActiveWorkbook.SaveAs Filename:= ChDir & nomsauvegarde _
, FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False

sousou · 6 Novembre 2003

Pour ma part, j'ai l'habitude de faire comme ci-dessous.

nomsauvegarde = InputBox("Entrer le nom du fichier : ")

chemin="c:\comparaison\ " 'répertoire ou le fichier sera sauvegardé

monfichier=chemin & nomsauvegarde

ActiveWorkbook.SaveAs Filename:= monfichier

Cela devrait t'offrir plus de possibilités, chemin pouvant être calculé
du genre, chemin=thisworkbook.path si tu veux que le répertoire de rangement soi le même que celui ou ce trouve la macro.

Bonne chance

Patrick · 6 Novembre 2003

merci bien à vous 2 !

enregistrement

Patrick

Guest

Gandalf

Guest

sousou

Guest

Patrick

Guest

Discussions similaires