Wert einer Variable an Bericht übergeben

Ich möchte in einem Bericht den Wert einer Variable verwenden, den ich in einem Modul gesetzt habe. Mein Problem dabei: Der Wert wird korrekt gesetzt, steht im Bericht aber nicht zur Verfügung.

Ich bin ziemlicher Anfänger in Sachen VBA. Und trotzt intensiver Lektüre der Hilfe von VBA 6 und etlicher Versuche komme ich hier einfach nicht weiter.

Ich verwende den folgenden Code:

Function Gesamtübersicht()
On Error GoTo Gesamt\_Err

 Dim Empfaenger As String
 Empfaenger = "TA Eichsfeld"
 Debug.Print Empfaenger

 DoCmd.OpenReport "Übersicht Papier", acPreview, "", "[Tabellen 2000/2001]![Saisonbeginn]\>Date()-365 And ([Tabellen 2000/2001]![Letzter Spieltag]\>=Date() Or [Tabellen 2000/2001]![Letzter Spieltag] Is Null)" ' Operation ausführen.
 Call Drucker\_waehlen
 DoCmd.Close acReport, "Übersicht Papier"

Gesamt\_Exit:
 Exit Function

Gesamt\_Err:
 MsgBox Error$
 Resume Gesamt\_Exit

End Function

Ich bin für jede Hilfe dankbar.

Ja, ja. Die Antwort ist ganz einfach :wink: Eine lokale Variable kann nicht global verwendet werden.

ich hatte geahnt, dass es so etwas „einfaches“ ist. Aber Als Anfänger scheitert man halt gelegnetlich an so etwas. Erst recht in tiefer Nacht.

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]