Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1464to1468
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Inhalt aus Listbox Drucken

Inhalt aus Listbox Drucken
06.01.2016 12:46:55
Ralle
Hallo Forum-ler,
Ihr habt alle so ein großes Wissen darüber, ich beneide euch dafür. Wie stelle ich es an den Inhalt aus der Listbox zu Drucken. Kann mir jemand einen kleinen Code geben sodass ich über einen Button auf der Userform den Inhalt ausdrucken kann.
vielen Dank für eueren Support.
viele Grüße

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Inhalt aus Listbox Drucken
06.01.2016 12:57:06
Rudi
Hallo,
am einfachsten in ein temporäres Blatt schreiben und das drucken.
Private Sub cmdPrint_Click()
Dim arrList, wsTmp As Worksheet
If lsb1.ListCount > 0 Then
arrList = lsb1.List
Set wsTmp = Worksheets.Add(after:=Sheets(Sheets.Count))
With wsTmp
.Cells(1, 1).Resize(UBound(arrList), UBound(arrList, 2)) = arrList
.Columns.AutoFit
.PrintOut
Application.DisplayAlerts = False
.Delete
Application.DisplayAlerts = True
End With
End If
End Sub
Gruß
Rudi
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige