Masquer un bouton à l'impression

M

mécano41

XLDnaute Accro

• 19 Septembre 2007

• #2

Re : Masquer un bouton à l'impression

Bonjour,

Un exemple pour masquer et remettre :

Sub CacherBouton()
Feuil1.CommandButton1.Visible = False
End Sub

Sub RemettreBouton()
Feuil1.CommandButton1.Visible = True
End Sub

Cordialement

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 19 Septembre 2007

• #3

Re : Masquer un bouton à l'impression

Bonjour


Sans macro

Format de controle/Propriétés/ décocher Imprimer l'objet


Avec Macro (merci l'enregisteur de macro)

Code:

Sub Macro2()
    ActiveSheet.Shapes("Button 1").Select
    With Selection
        .Placement = xlMoveAndSize
        .PrintObject = False
    End With
End Sub

 

Dernière édition: 19 Septembre 2007

Vote positif 0 Vote négatif

jeanpierre

Nous a quitté

Repose en paix

• 19 Septembre 2007

• #4

Re : Masquer un bouton à l'impression

Bonjour à tous,

Il s'agit, si j'ai bien compris d'un bouton issu de la barre d'outils contrôles.

Sans macro, en mode édition (l'équerre verte), clic droit sur le bouton, propriétés mettre PrintObject à False et c'est bon.

Bonne soirée.

Jean-pierre

 

Vote positif 0 Vote négatif

Q

quercynol

Guest

• 20 Septembre 2007

• #5

Re : Masquer un bouton à l'impression

Bonjour,

merci à vous trois de vos réponses,
j'ai fais simple, j'ai pris la solution de Jeanpierre, ça marche!
encore merci.
A bientôt.
Quercynol

 

Vote positif 0 Vote négatif