Discussion :

[Bigcall]

Bonjour ,
j'ai besoin de savoir s'il est possible de programmer que lorsqu'une case est cochée ,le champ correspondant s'affiche pour l'impression et à l'inverse lorsqu'elle n'est pas cochée elle n'apparaît pas.
Et si oui quel est la marche à suivre....
Je vous remercie
A bientôt

[Invité]

Bonjour,

Vous devez sans doute faire allusion aux affichages personnalisés.

Ne sachant pas, le fichier joint contient les exemples suivants :
- Un checkbox faisant apparaître ou disparaître les boutons Imprimer et Saisir.
- Deux CustomViews qui font disparaître ou apparaître la colonne Téléphone pour l'impression ou pour la saisie.

Pièce jointe 203541

Le code dans l'onglet Feuil1

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
Private Sub BoutonImprimer_Click()
    ActiveWorkbook.CustomViews("Impression").Show
End Sub
 
Private Sub BoutonSaisir_Click()
    ActiveWorkbook.CustomViews("Saisie").Show
End Sub
 
Private Sub CheckBoxMenu_Click()
 
        If CheckBoxMenu = True Then
            BoutonImprimer.Visible = True
            BoutonSaisir.Visible = True
        Else
            BoutonImprimer.Visible = False
            BoutonSaisir.Visible = False
        End If
End Sub

En ce qui concerne les CustomViews, (menu : Affichage, Personnalisé), il vous faut d'abord réaliser la présentation telle que vous la souhaitez puis la sauvegarder (ex ici : impression, la colonne Téléphone est cachée). L'affichage Saisie remet tout en ordre.

Pièce jointe 203542

Cordialement.

[Invité]

Bonjour,
Pourquoi tester un booléen pour affecté la même valeur à un autre booléen?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
            BoutonImprimer.Visible = CheckBoxMenu
            BoutonSaisir.Visible = CheckBoxMenu

en revanche je ne sais pas si c'est imprimer visible ou imprimable!

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Private Sub CheckBox1_Click()
 CheckBox1.PrintObject = CheckBox1.Value
End Sub

[Invité]

Pourquoi tester un booléen pour affecté la même valeur à un autre booléen?
[/c]

Bonjour,

La question est de savoir si ce sont des affichages personnalisés qui sont souhaités, ou s'il s'agit de faire apparaître ou disparaître un menu à partir du checkbox.

Cordialement.

[Bigcall]

Merci pour vos réponses et je me rend compte que je n'avais en effet pas été assez clair.
En fait je cherche à remplir une liste dont je cocherais certaine ligne et seule ces lignes apparaitraient pour impression.
histoire de ne récupérer que l'essentiel.
Dans tous les cas merci pour votre temps.
@+
Elodie

[Invité]

Les affichages personnalisés fonctionnent également pour les filtres.

Cordialement.