Ich suche eine VBA Funktion, die folgendes kann:
- Ich öffne ein Formular
- Ich filtere mit dem formularbasierten Filter
- Die gefilterte Daten will ich in einem Bericht anzeigen
Ich habe dazu auf meinem Formular einen Button mit folgender Funktion:
Private Sub VorschauAdressliste\_Click()
On Error GoTo Err\_VorschauAdressliste\_Click
Dim stDocName As String
stDocName = "Adressliste"
DoCmd.OpenReport stDocName, acPreview
Exit\_VorschauAdressliste\_Click:
Exit Sub
Err\_VorschauAdressliste\_Click:
MsgBox Err.Description
Resume Exit\_VorschauAdressliste\_Click
End Sub
Wie sieht der zusätzlich notwendige Parameter für „DoCmd.OpenReport“ aus, um das aktuelle Filter zu benutzen?
Vielen Dank für jede Hilfe
Armin