tri selectif et impression via userform

BERRACHED said

XLDnaute Accro

• 9 Septembre 2008

• #2

Re : tri selectif et impression via userform

Salut,nrdz83

tu veux dire imprimer le contenu de l'Userform puisque ton tri est fait a l'aide de tes combobox ?

Cordialement

 

Vote positif 0 Vote négatif

nrdz83

XLDnaute Impliqué

• 9 Septembre 2008

• #3

Re : tri selectif et impression via userform

bonjour said non je souhaites imprimer le résultat de ma base de donnée mais en faisant un tri sélectif via les combobox. Merci 🙄

 

Vote positif 0 Vote négatif

nrdz83

XLDnaute Impliqué

• 12 Septembre 2008

• #4

Re : tri selectif et impression via userform

bonsoir je redemande vos lumières, et repost pour faire monter ce post.
Mes amitiés 🙄

 

Vote positif 0 Vote négatif

C

Compte Supprimé 979

Guest

• 13 Septembre 2008

• #5

Re : tri selectif et impression via userform

Salut Mister Bean (Alias Nrdz83)

Ca faisait longtemps 😀

Tu trouveras ci-dessous le lien vers ton fichier modifié
Cijoint.fr - Service gratuit de dépôt de fichiers

C'est une possibilité, en utilisant le filtrage automatique 😉

A+

 

Vote positif 0 Vote négatif

nrdz83

XLDnaute Impliqué

• 13 Septembre 2008

• #6

Re : tri selectif et impression via userform

Bonjour bruno M45 et oui ça faisait longtemps et plaisir de te relire. Super ta réussi ça marche, par contre userform reste affiché, faut il rajouter un code afin qu'il se ferme lors de l'aperçu?
Merci j'ai beau lire le code je comprend pas comment tu as fait mes amitiés et encore merci pour tout

 

Vote positif 0 Vote négatif

C

Compte Supprimé 979

Guest

• 13 Septembre 2008

• #7

Re : tri selectif et impression via userform

Re,

Change le code du bouton comme suit

Code:

Private Sub BnApperçu2_Click()
  Call FiltrageLigne
  ' Lancer la previsualisation
  With Sheets("base de données")
    DerLig = .Range("A" & Rows.Count).End(xlUp).Row
    With .PageSetup
      .PrintArea = "$A$2:$P$" & DerLig
      .Orientation = xlLandscape
      .FitToPagesWide = 1
      .FitToPagesTall = False
    End With
    ' Masquer l'UserForm avant l'apperçu
    Me.Hide
    ' Apperçu de la feuille
    .PrintPreview
    ' Afficher de nouveau l'Userform
    Me.Show
    ' Désactive le filtrage automatique
    .Range("A2").AutoFilter
  End With
End Sub

A+

 

Vote positif 0 Vote négatif

nrdz83

XLDnaute Impliqué

• 13 Septembre 2008

• #8

Re : tri selectif et impression via userform

😎merci bruno m45 tout fonctionne impeccable le top un grand grand merci. Une dernière petite question au sujet du forum tu sais peut être, quand le problème est résolu faut il l'indiquer aux autres utilisateurs? afin qu'ils ne cherchent plus ?
Bye et bon week end amitiés

 

Vote positif 0 Vote négatif