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