UN BOUTON POUR DEUX CODES (imprimer +enregistrer)

Dranreb

XLDnaute Barbatruc

• 8 Mars 2012

• #2

Re : UN BOUTON POUR DEUX CODES (imprimer +enregistrer)

Bonsoir
Vous pouvez tester et modifier son Caption par exemple (s'il s'agit bien d'un CommandButton et non pas d'un bouton de formulaire)
Cordialement.

 

Vote positif 0 Vote négatif

Ilino

XLDnaute Barbatruc

• 9 Mars 2012

• #3

Re : UN BOUTON POUR DEUX CODES (imprimer +enregistrer)

Bonsoir JP Bonsoir darnerb
JP merci pour l’exemple good Idea , je vais l’adapter a mon programme… si tu permet j’ai autre souci sur le bouton lui mémé comment faire changé le caption du bouton de Imprimer au enregistrer et réciproque lors de clic.
THINKS

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 9 Mars 2012

• #4

Re : UN BOUTON POUR DEUX CODES (imprimer +enregistrer)

Dans la procédure évènement du bouton, affecter une autre constante String à son Caption, c'est tout.

 

Vote positif 0 Vote négatif

Ilino

XLDnaute Barbatruc

• 9 Mars 2012

• #5

Re : UN BOUTON POUR DEUX CODES (imprimer +enregistrer)

Salut Dran
merci thinks grazie pour la réponse ;mais je ne sais pas si tu m'as bien compris!!!???
NB / Je ne suis pas bien placé dans les code VBA😱

 

Vote positif 0 Vote négatif

P

patoq

XLDnaute Occasionnel

• 9 Mars 2012

• #6

Re : UN BOUTON POUR DEUX CODES (imprimer +enregistrer)

Salut Ilino Salut Dranreb,

Et voila

A plus

 

Pièces jointes

• bouton deux actions v1.xlsm

  20 KB · Affichages: 63

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 9 Mars 2012

• #7

Re : UN BOUTON POUR DEUX CODES (imprimer +enregistrer)

VB:

Private Sub CommandButton1_Click()
If CommandButton1.Caption = "Enregistrer" Then
   ThisWorkbook.Save
   CommandButton1.Caption = "Imprimer"
Else
   ThisWorkbook.PrintOut
   CommandButton1.Caption = "Enregistrer"
   End If
End Sub

C'était si compliqué à appliquer comme je le disais ?

 

Vote positif 0 Vote négatif

Ilino

XLDnaute Barbatruc

• 9 Mars 2012

• #8

Re : UN BOUTON POUR DEUX CODES (imprimer +enregistrer)

WAOH super GRAZEI
OH Désolé BONJOUR PATOQ
Merci pour l'example
ma question est il possible de remplacer le CommandButton par ToggleButton ???
encore merci merci grazei un tres bon exmple utile

 

Vote positif 0 Vote négatif

P

patoq

XLDnaute Occasionnel

• 9 Mars 2012

• #9

Re : UN BOUTON POUR DEUX CODES (imprimer +enregistrer)

Et un ToggleButton un :

 

Pièces jointes

• bouton deux actions v2.xlsm

  19.7 KB · Affichages: 54

Vote positif 0 Vote négatif

Ilino

XLDnaute Barbatruc

• 9 Mars 2012

• #10

Re : UN BOUTON POUR DEUX CODES (imprimer +enregistrer)

Salut
et merci tous le monde pour votre aide Épouvantable merci Dranreb ,Grazei JP, merci&grazei patoq
Bonne Nuit A+

 

Vote positif 0 Vote négatif

Ilino

XLDnaute Barbatruc

• 9 Mars 2012

• #11

Re : UN BOUTON POUR DEUX CODES (imprimer +enregistrer)

OUPS SORRY patoq avant d'aller dormir j'ai oublie autre chose??😱
lors d'enregistrement ya pas d'autre possibilité d'enregistrer seulement la feuille active et non pas le classeur ???
😱

 

Dernière édition: 9 Mars 2012

Vote positif 0 Vote négatif