Frågan har säkert diskuterats innan. Fins en funktion som heter PrintForm.Skriva ut en Form?
Jag har en Form som presenterar lite data, bilder och tabeller.
Hur gör jag för att skriva ut allt detta?
Alltså ingen skärmdump på skrivbordet, utan bara "mitt" program.
Ännu bättre vore det om man kunde lägga allt viktigt på en stor Label och skriva ut den, så slipper man knappar och sånt.
Är detta svårt eller finns det några färdiga lösningar?Sv: Skriva ut en Form?
Private Sub Command1_Click()
PrintForm
End Sub
Samma som:
Private Sub Command1_Click()
Me.PrintForm
End Sub
Alternativt om det inte är aktuellt formulär du vill skriva ut:
Private Sub Command1_Click()
Form2.PrintForm
End SubSv: Skriva ut en Form?
Problemet med printform är dock att utskriften inte är samma format som ett A4. Om du inte vill få med knappar och liknande måste du använda printer objektet.
Du kan loopa igenom att kontroller som du vill ha med i din utskrift.
TExtboxar, labels och bilder kan du skriva ut men tex inte Innehållet i en Grid eller en Listview.
Lite knöligt men det går med lite tankemöda
Nettan