codice:Private Sub PrintList() Dim i As Integer If File1.ListCount = 0 Then Exit Sub For i = 0 To File1.ListCount - 1 'Qui devi posizionare la stampa (vedi sotto) Printer.Print File1.List(i) Next End Sub
Questa è una discussione molto simile dove poter trarre spunto.
http://forum.html.it/forum/showthrea...hreadid=436481
![]()