OVH Cloud OVH Cloud

Filtre automatique

2 réponses
Avatar
Claude B
Bonjour à tous,

J'ai une liste de matériel avec, dans une colonne, le numéro de la caisse où
il se trouve.
Je désire imprimer des listes par caisse.
J'utilise donc un filtre automatique.

Pour savoir ce que j'ai imprimé, je désire faire changer automatiquement le
titre de la feuille en fonction des filtres choisis par l'utilisateur.
Est-ce qu'il est possible de récupérer cette valeur et de la mettre dans une
cellule ?

Un grand merci d'avance pour votre aide.

Claude

2 réponses

Avatar
JB
Bonjour,


http://cjoint.com/?fggIbNIOsw

En A2: =filtreactuel(1)

Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.CenterHeader = [A2]
End Sub

Cordialement JB
Avatar
Claude B
Alors là, BRAVO.

Super fonction.

Un grand merci pour ton aide et bonne soirée.

Claude

P.S. Merci aussi à ceux qui ont passé un peu de temps pour tenter de
m'aider.


"JB" a écrit dans le message de news:

Bonjour,


http://cjoint.com/?fggIbNIOsw

En A2: =filtreactuel(1)

Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.CenterHeader = [A2]
End Sub

Cordialement JB