Re,
Alors il faut que tu expliques ce que tu veux faire par rapport au fichier que tu as donné car le bouton "enregistrer sous" déclenche le code ci-après
Sub Bouton23_Clic()
Application.Dialogs(xlDialogSaveAs).Show ("NomClasseur.xls")
End Sub
où "Nom du classeur" apparait et doit être remplacé par le nom fichier que tu souhaites donner au fichier que tu vas sauvegarder.
Si cela ne va pas, explique ce que tu veux sauver :
- La feuille 1
- le classeur entier
- quel est le répertoire de destination (dans le code ci-avant c'est toi qui le choisit via la boite de dialogue)
A te relire
Dan