Un peu d'aide SVP !

[thefa]

Bonjour

Je souhaiterai integrer un bouton dans une feuille excel et ensuite affecter une macro qui permette a la personne qui clic dessus d'avoir le méme résultat que si elle cliquer sur "enregistrer sous".
Ce bouton serait en fait un raccourci de la fonction "enregistrer sous"

Merci de votre aide !!!

Thefa

 

[@Christophe@]

Bonjour,

Ben c'est pas trop compliqué, tu affiche via menu Affichage le Boite à outils de Contrôle, tu ajoutes un Command Button sur ta feuille

Ensuite tu ajoutes le code suivant à ton bouton et le tour est joué

Private Sub CommandButton1_Click()
Application.Dialogs(xlDialogSaveAs).Show
End Sub

@Christophe@

 

[thefa]

Merci mais est il possible de modifier le nom du bouton car il le nomme "commandbutton1" et comment le deplacer aussi...

merci d'avance !!

 

[thefa]

C'est bon j'ai trouvé !!!!

Sans vouloir abuser de votre générosité pourriez vous me donner le code lancer une impression et pour lancer l'icone ouvrir !!

Merci bcp !!!

 

[Alain]

Bonjour,


Pour lancer une impression :


ActiveSheet.PrintOut ou ActiveSheet.PrintPreview (pour l'aperçu)

Pour ouvrir un fichier :

Application.Dialogs(xlDialogOpen).Show


@+

 

[mouad]

merci pour enregistrer sous selement en ce qui concerne imprimer par page;ca marche pas; vouler vous jeter 1 coup doeil
merci davance

 

[petchy]

salut mouad

essaye peut etre se code

ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True

petchy