Stefan_matlos
XLDnaute Nouveau
boujour au forum
voici un code
Sub Bouton1_QuandClic()
sheets("Devis").Copy
Application.Dialogs(xlDialogSaveAs).Show
End Sub
mais je voudrais que la boite de dialogue s'ouvre sous C:\Devis
est ce possible
voici un code
Sub Bouton1_QuandClic()
sheets("Devis").Copy
Application.Dialogs(xlDialogSaveAs).Show
End Sub
mais je voudrais que la boite de dialogue s'ouvre sous C:\Devis
est ce possible