Hallo Leute!
Will aus dem Access-2000-Formular nur die aktuelle Seite ausdrucken! Wenn ich auf das Druck-Symbol klicke, druckt es mir immer alles aus und das ist doch recht mühsam, wenn man 100 Seiten hat.
Hoffe ihr könnt mir da einen Tipp geben!
Danke und viele Grüsse, Klaus.
Hallo Klaus,
erzeuge doch eine Schaltfläche auf Deinem Formular und hinterlege
in dieser Schaltfläche bei der Eigenschaft Beim Klicken
folgende Sub(-Prozedur):
Private Sub KlausSchaltfläche\_Click()
On Error GoTo Beenden
Dim vonSeite, bisSeite As Integer
vonSeite = InputBox("Ab einschl. welcher Seite soll gedruckt werden?", "Drucken von Seite...", 1)
bisSeite = InputBox("Bis einschl. welcher Seite soll gedruckt werden?", "Drucken bis Seite...", 1)
DoCmd.PrintOut acPages, vonSeite, bisSeite
Beenden:
Exit Sub
End Sub
gruss
moritzbock
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]