Bonjour,

Je souhaiterais ratacher à un bouton un code qui ouvre une boite de dialogue enregistrer sous et qui enregistre non pas le fichier entier mais uniquement l'onglet Feuil1.

Je n'arrive meme pas à ouvrir la boite de dialog enregistrer sous.

J'ai un code qui me permet d'ouvrir la boite de dialogue ouvrir un fichier

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
 
Dim fichier As Variant
ChDrive "H"
ChDir ("H:\DATA\")
fichier = Application.GetOpenFilename
Application.ScreenUpdating = True
Application.DisplayAlerts = False
Application.AskToUpdateLinks = False
If fichier = False Then
Application.DisplayAlerts = True
Exit Sub
End If
J'ai essayé de remplacer Getopenfilename par Getsavefilename mais ce n'est visiblement pas aussi simple..... :s



Merci pour votre aide.