pb avec la création d'un fichier excel

[jess]

Bonjour,

je voudrais créer à partir du code vba un fichier excel et recopier le contenu d'une feuille d'un fichier excel qui est déjà ouvert.
Le problème, c'est que je voudrais enregistrer le nouveau fichier avec un nom de fichier saisi dans une inputbox.
Est ce que quelqu'un pourrait m'aider ?

Je vous remercie par avance!!!!!!!

 

[Moa]

Salut Jess !

Je ne sais où tu en es dans ta macro, en tout cas pour enregistrer ton classeur, voilà le code :

ActiveWorkook.SaveAS InputBox1.Value


Maintenant, si tu veux l'enregistrer en évitant le message de confirmation, écris :

Application.DisplayAlerts = False
ActiveWorkook.SaveAS InputtBox1.Value
Application.DisplayAlerts = True

Maintenant, si le nom que tu veux lui donner est dans une cellule de ta feuille active :

ActiveWorkook.SaveAS Range("A1").Value

Si il n'est pas dans la feuille active :

ActiveWorkbook.SaveAs Sheets("Feuil1").Range("A1").Value

A savoir que ton classeur sera enregitré par défaut dans le répertoire "Mes"Documents"

Si tu voulais l'enregistrer dans un autre répertoire, deux solutions :

Soit tu spécifies le chemin dans ta macro :

ActiveWorkbook.SaveAs Filename:= _
"C:\Documents and Settings\Robin\Bureau\ExcelActu\TestClasseur.xls



Soit tu changes le répertoire de destination par défaut, carrément dans Excel, avec le menu Outils / Options / Onglet Général / Dossier par défaut.

@ +

Moa