Supportnet / Forum / Datenbanken

Helloou ägään! Noch ein Problemchen: Ich habe ein Formular in dem eine Tabelle mit meinen Daten eingebettet ist. Darüber kann ich durch verschiedene Auswahlfelder (Kombinationsfelder mit Abfragen) die Kriterien für die Daten einschränken, die angezeigt werden sollen. Ich suche jetzt einen Druckbefehl, der mir die Auswahl so druckt wie ich sie im Formular habe. Also NUR die 3 Datensätze beispielsweise die ich jetzt durch meine Kriterien ausgewählt habe udn nicht alle 300 Datensätze ... bei mir druckt er immer die ganze Tabelle aus ... aaaaahrgh! Merci! Gruuuuß me.

Hallo
Erzeuge einen Bericht.
In einem Modul erstelle die Variable

 Public   p_Filter as String

dann beim Filtern entsprechenden Code einfügen:

    Me.FilterOn = True
    Me.Filter = "[Abtlg] = ´" & Me![Kombinationsfeld116] & "´"
   p_Filter=me.Filter
 

Den Bericht folgendermassen aufrufen:

 Private Sub Befehl120_Click()
On Error GoTo Err_Befehl120_Click

    Dim stDocName As String

    stDocName = "MeinBericht"
    DoCmd.OpenReport stDocName, acNormal, ,   p_Flter
Exit_Befehl120_Click:
    Exit Sub

Err_Befehl120_Click:
    MsgBox Err.Description
    Resume Exit_Befehl120_Click
    
End Sub

Gruß piano

_{Es wäre nett, wenn Du ein Feedback abgeben könntest,}
^{ob der Lösungsvorschlag Dein Problem gelöst hat.}

Dankeschön! Ich werde es gleich einmal ausprobieren!

Schönen Start in die Woche!

• PDF - (win to pdf) ins Druckmenü einfügen - aber wie ??
• Druckauswahl funktioniert nicht