XL 2013 Filtre critères choisi dans combobox

Appo1985 · 2 Décembre 2023

Bonjour
J’aimerais pouvoir imprimer le tableau qui se trouve sur la feuille « BDD » après l’avoir filtrer selon le ou les choix dans les combobox situant dans le userform.
J’ais construis un autre tableau pour les critères au niveau de la plage " O1 :U2 ". Je sais pas aussi si c’est possible d’utiliser directement les valeur de combobox comme critères.
ci-joint le fichier
Merci par avance

Dranreb · 2 Décembre 2023

Voilà :

job75 · 3 Décembre 2023

J'ai pu me rendre compte que le problème venait des mises en page.

Je ne sais pas quelles sont celles qui sont fautives.

Dans ce fichier je les ai toutes mises dans la macro Imprimer :

VB:

Sub Imprimer()
With [Tableau2].ListObject.Range
    .Parent.PageSetup.PrintArea = .Address
    .Parent.PageSetup.PrintTitleRows = .Rows(1).Address
    .Parent.PageSetup.Zoom = False
    .Parent.PageSetup.FitToPagesWide = 1
    .Parent.PrintPreview 'aperçu pour tester
    '.Parent.PrintOut 'pour imprimer
End With
End Sub

Usine à gaz · 3 Décembre 2023

job75 à dit:
Bonsoir Lionel et merci,

Même après une longue période d'inactivité du fichier ?

Je l'ai téléchargé ce matin à 18h.
Je le teste à nouveau post #22 à 23h55 = pareil quasi-instantané,
Test fichier post #31= pareil quasi Instantané
Bonne nuit,

job75 · 4 Décembre 2023

Il est possible qu'il s'agisse d'un bug d'Excel 2019.

Peut-être qu'une mise à jour viendra le corriger.

Bonne nuit Lionel.

Usine à gaz · 4 Décembre 2023

A toi aussi

Appo1985 · 4 Décembre 2023

Appo1985 à dit:
Bonjour
J’aimerais pouvoir imprimer le tableau qui se trouve sur la feuille « BDD » après l’avoir filtrer selon le ou les choix dans les combobox situant dans le userform.
J’ais construis un autre tableau pour les critères au niveau de la plage " O1 :U2 ". Je sais pas aussi si c’est possible d’utiliser directement les valeur de combobox comme critères.
ci-joint le fichier
Merci par avance

J'ai eu des réponses très intéressantes. Merci bien @sousou, @Lolote83, @Dranreb, @job75, @Usine à gaz

XL 2013 Filtre critères choisi dans combobox

Appo1985

XLDnaute Occasionnel

Pièces jointes

Dranreb

job75

XLDnaute Barbatruc

Pièces jointes

Usine à gaz

XLDnaute Barbatruc

job75

XLDnaute Barbatruc

Usine à gaz

XLDnaute Barbatruc

Appo1985

XLDnaute Occasionnel

Discussions similaires