Imprimer le contenue d'une listview

Soyez le premier à donner votre avis sur cette source.

Vue 15 766 fois - Téléchargée 2 137 fois

Description

Voilà ce code n'est pas de moi mais je tient à vous le faire partager car je sais qu'il n'en existe pas de ce genre a moin de faire des "bidouille". Aprés avoir chercher pendant des moi j'ai trouver comment imprimer une listview et en plus avec un aperçus avant impression

Source / Exemple :


Private Sub PrintOrPreviewListView(ByVal Preview As PrintPreview)
      ' create a strongly type collection of
      ' printstructure(columns)
      Dim ps As PrintStructureListView
      Dim col As New PrintListViewCollection

      ' print column 0 of grid
      ps = New PrintStructureListView
      ps.Column = 0
      ps.NumberDataColumnChars = 5
      ps.Alignment = Align.Center
      ps.PrintColumnWidth = 7
      col.Add(ps)

      ' print column 1 of grid
      ps = New PrintStructureListView
      ps.Column = 1
      ps.NumberDataColumnChars = 15
      ps.Alignment = Align.Left
      ps.PrintColumnWidth = 18
      col.Add(ps)

      ' print column 5 of grid
      ps = New PrintStructureListView
      ps.Column = 2
      ps.NumberDataColumnChars = 20
      ps.Alignment = Align.Left
      ps.PrintColumnWidth = 22
      col.Add(ps)

      ps = New PrintStructureListView
      ps.Column = 3
      ps.NumberDataColumnChars = 25
      ps.Alignment = Align.Left
      ps.PrintColumnWidth = 27
      col.Add(ps)

      ps = New PrintStructureListView
      ps.Column = 4
      ps.NumberDataColumnChars = 10
      ps.Alignment = Align.Right
      ps.PrintColumnWidth = 12
      col.Add(ps)

      ' set up print options
      Dim po As New PrintOptions
      po.CharsPerLine = CharsPerLine.CPL80
      po.ColHdr1 = "Col 1".PadRight(7) & _
                   "Column 2".PadRight(18) & _
                   "Column 3".PadRight(22) & _
                   "Column 4".PadRight(27) & _
                   "Column 5".PadRight(12)
      po.Portrait = PrintOrientation.Portrait
      po.Title = "My ListView Report"
      po.PrintOrPreview = Preview
      po.SubTitle = "This Report is ListView Columns 0-5"
      po.Boxed = True
      po.LeftMarginExtender = MarginExtender.OneHalfInch
      po.RightMarginExtender = MarginExtender.OneHalfInch
      po.TopMarginExtender = MarginExtender.OneHalfInch
      po.BottomMarginExtender = MarginExtender.OneHalfInch

      ' print the grid
      Dim pg As New CPrintGrid
      pg.PrintGrid(ListView1, col, po)

   End Sub

Conclusion :


J'ai regarder sur le site je n'est trouver de code aussi parfait que celui-ci dans le genre mais je sais aussi que beaucoup de gents recherche ce code alors voilà c pour vous. Et ces aussi ma 1ere contribution. Il est convertis en VS 2005

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

Messages postés
6
Date d'inscription
lundi 3 mai 2010
Statut
Membre
Dernière intervention
18 mai 2010

super code, maintenant en intégrant dans mon prog. et par simple clic de bouton (Imprimer), je veux imprimer le contenu de mon listview, quel partie du code je dois intégrer?
Messages postés
6
Date d'inscription
lundi 3 mai 2010
Statut
Membre
Dernière intervention
18 mai 2010

super code, maintenant en intégrant dans mon prog. et par simple clic de bouton (Imprimer), je veux imprimer le contenu de mon listview, quel partie du code je dois intégrer?
Messages postés
6
Date d'inscription
lundi 3 mai 2010
Statut
Membre
Dernière intervention
18 mai 2010

super code, maintenant en intégrant dans mon prog. et par simple clic de bouton (Imprimer), je veux imprimer le contenu de mon listview, quel partie du code je dois intégrer?
Messages postés
181
Date d'inscription
dimanche 3 décembre 2006
Statut
Membre
Dernière intervention
28 octobre 2010

Bonjour,

Le ode est interessant, cependant certaines parties apparaissent surlignées;
Par exemple : ps = New PrintStructureListView

Faut-il un imports ?

Merci d'avance
Messages postés
3
Date d'inscription
jeudi 26 mars 2009
Statut
Membre
Dernière intervention
4 avril 2009

help , je suis novice en vba et j'aimerai bien utiliser ce code mais je sais pas dans quelle partie il faut le mettre : module, module de classe? DOIT t'on mettre un bouton imprimer qui puisse appeler (call) ce code ou bien?

AIDER MOI, merci d'avance
Afficher les 7 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.