Office: (Office 2000) Datenquelle einem Bericht zuordnen per VBA

Hallo,

zuerst vielen Dank für Euere Beiträge. Im Forum habe ich leider nichts gefunden bezüglich folgenden Fall.
Ich möchte einen Bericht (rptToDo) öffnen und diesem die Daten über RecordSource zuweisen. Für ein Formular ist das die Lösung. Doch beim Bericht klappt dies hier nicht . Hat jemand eine Idee?
Das war`s.
Schönen Tag noch
Klaus

DoCmd.OpenReport "rptToDo", acPreview
rptToDo.RecordSource = "SELECT * FROM qDruck"

:)

 

Verwende einmal das Berichts-Ereignis "Beim Öffnen":

Code:

 

Wenn es denn unbedingt "von außen" gesteuert werden muss, geht es auch so: Code:

 

Hi Arne und Anne,
vielen Dank für die Lösungsvorschläge. Der Bericht muß leider "von außen" gesteuert werden" - daher geht das mit Arnes Vorschlag nicht.
Der ander Code klappt wunderbar, leider wird der Wechsel in die Entwurfsansicht des Berichts angezeigt.
Ist es möglich diesen Vorgang unsichtbar zu schalten?
Bis bald
Klaus

 

Du kannst doch auch von aussen (z.B. mittels einer globalen Variablen) die Datenherkunft des Berichtes steuern.
Also im Formularcode:
Code:

Und dann im Berichtscode:
Code:

Vielleicht hilft es auch, die OpenReport-Anweisung entsprechend zu ändern:
Code:

PS: Alle Beispielcodes für "Feld" sind gültig, wenn "Feld" ein Zahlenfeld ist.

 

Hi KlTroe,

Um Daten aus dem aktiven Bestand oder aus dem Archiv anzuzeigen mache ich das so:
(Die Felder sind bei mir in der Archiv-Tab id. mit denjenigen aus der aktiven Tabelle)

Ich habe eine Abfrage: QryDatenherkunft
In einem Formular steuere ich dann das ganze:

Code:

cheerioh
SiS