Jag visar en listbox i en dialogruta där information om nyheter mm.
på programmet visas.
Den vill man kunna skriva ut.
Hur gör man detta på enklast sätt?

Lägg detta ex i en Printerknapp och justera värdena som du vill
<code>
Dim i As Long
Printer.ScaleMode = 7 'ScaleMod = centimeter
Printer.FontName = "Arial"
Printer.FontSize = 10
Printer.FontBold = True
Printer.CurrentX = 2: Printer.CurrentY = 3
For i = 0 To List1.ListCount - 1
Printer.Print List1.List(i)
Printer.CurrentX = 2
Next ' i
'Printer.NewPage ' om det behövs
Printer.EndDoc
</code>

Tack så mycket för koden.
Den löste problemet.

mvh
Peter