Office: (Office 2010) Per VBA Textfeld in einem Bericht ändern

Du bist im vba bereich, da gibt es keine makros mehr, sicher kann man docmd.runmacro fahren, aber das ist hier fehl am platze.
Was verbirgt sich hinter rs beschreibung value?

 

Du solltest als erstes die Begriflichkeiten lernen.
Ein Textfeld unterscheidet sich von einem Bezeichnungsfeld.
Code:

"Caption" ist eine Eigenschaft des Bezeichnungsfeldes.
Also handelt es sich um Bezeichnungsfelder, oder?
In #11 habe ich geschrieben was Du machen sollst.

vorher aber die Eigenschaft auf [Ereignisprozedur] stellen oder im folgenden Dialog-Fenster "Code-Generator" wählen.
Dann wird Dir automatisch eine entsprechende Prozedur angelegt.
Dazwischen schreibst Du deinen Code
Code:

Um Werte aus der Datenherkunft des Berichtes den Bezeichnungsfelder zuzuweisen, musst Du diese als "versteckte" Felder in den Berichtsbereich setzten (myCaption, myDescr) und mit den entsprechenden Feldern verbinden und unsichtbar machen.
Eine direkte Verwendung von Datenherkunftsfeldern zur Änderung der Bezeichnungsfelder ist mir (bis Acc2003) nicht bekannt. Vielleicht geht das aber in Acc2010??

HTH

 

Ok ich habe vergessen, codegenerator auswählen stimmt
@blackpit
Was verstehst du unter datenherkunftsfeldern?

 

Das ist i.R. die Datenherkunft des Berichts und somit die Felder = Datenherkunftsfelder
Oder bekommst Du die Werte aus einem eigenen Recordset?

 

Was spricht dagegen, beim formatieren oder einem anderen ereignis, eine andere tabelle/abfrage aufzumachen und sich werte aus einer völlig anderen herkunft herzuholen....? Zb auch aus einem formular. ?.
Da ist man doch flexibel

 

Seit Acc2002 gibt es für OpenReport OpenArgs. Dieses Argument kann man bestens für die Übergabe von einzelnen Werten verwenden:
Code:

An was genau die Werte übergeben werden sollen, habe ich nicht verstanden.

 

Hallo zusammen,

sorry das ich mich erst jetzt melde, hatte am WE aber kein Internet.

Ich habe ein Recordset mit Datensätze. Diese werden mit einer Schleife durchlaufen.
In rs("Überschrift").Value stehen Text und die Sollen dann im untenstehenden Makro in die jeweiligen Textfelder reingeschrieben werden:

Code:

Wie kann ich jetzt dieser Prozedur die Werte rs("Überschrift").Value übergeben.

 

Hi ich habe mal ebs17 Lösungsvorschlag eingearbeitet:

Code:

und

Code:

Leider wirft er mir bei Code:

die Fehlermeldung Laufzeitfehler '2501'
Die Aktion OpenReport wurde abgebrochen raus ...

 

Wenn ich

Code:

eingebe, wird die Prozedur aufgerufen und es scheint zu funktionieren *Smilie

 

Die Prozedurerstellung solltest Du auch immer aus der Anwendung (Eigenschaftsfenster) heraus machen und nicht manuell eintragen.

 

Hi,

nachdem ich jetzt die Änderung hinbekommen habe mit euer Hilfe stehe ich vor einem neuen Problem.

Ich würde den Bericht gerne abspeichern:

Code:

Aber irgendwie schliesst er den Bericht, speichert aber nicht....

Im Netz habe ich glaube ich ein ähnliches Problem gefunden:

http://social.technet.microsoft.com/...dert-wurde-vba

Aber ich bekomme nicht die Umgehungslösung für mich hin. Hat jemand eine Idee?

 

Was soll der Bericht denn speichern? Daten sind und bleiben in Tabellen und werden im Bericht nur angezeigt.

Wenn Du die Berichtsansicht fixieren möchtest, solltest Du an ein PDF denken.

 

Hi ebs,

es ist so, dass ich einen Hauptbericht habe unter dem viele Unterberichte liegen. Der Hauptbericht wird mehrmals hintereinander geöffnet, immer nachdem die zu grundeliegende Tabelle der Unterberichte aktualisiert sind. Diese Tabellen enthalten aber nicht alle Angaben wie beispielsweise Seitenzahlen etc.

Wenn ich jetzt diese Änderungen in den Unterberichten vornehme, was ja funktioniert, und am Schluss den Hauptbericht öffnen, enthält der Hauptbericht nicht diese Änderungen. Im Makrorecorder wird zunächst


Hauptbericht:
Code:

ausgeführt, aber danach auch

Unterbericht:
Code:

ausgeführt für die Unterberichte aber die if Bedingung dann übersprungen.

Jetzt dachte ich mir speicher ich den Unterbericht müsste es funktionieren ...

Die PDF werden erst ganz zum Schluss aus dem Hauptbericht erzeugt.

 

So geht es nicht:
- ÖffnenArgumente können nur dem Hauptbericht übergeben werden.
- Ein Speichern macht nur Sinn, wenn Du in der Entwurfsansicht Änderungen vornimmst. Das willst Du sicher nicht wirklich.

Die OpenArgs-Variante ist deshalb schön, weil hier die Informationen mit dem Berichtsöffnen übergeben werden, d.h. der Bericht bleibt an der Stelle selbständig und ist nicht von anderen Objekten abhängig.
Nicht so schön, aber durchaus praktikabel ist die Variante, wo sich der Bericht (und dessen Unterberichte + Steuerelemente) die Informationen holen. Hier besteht dann eine zusätzliche Abhängigkeit von der Herkunft der Informationen.

Beispiel: In einem Textfeld eines geöffneten(!) Formulars steht die benötigte Information. Eine Funktion in einem Standardmodul holt sich diese Information, die Funktion dient ihrerseits als Steuerelementinhalt des Berichtscontrols.
Code:

Statt eines Formulars könnte so eine Funktion auch etwas anderes auslesen (Recordset, Array, ...).

Da Du Daten aus einem Recordset holst, müssten man da einen schlüssigen einfachen und direkten Weg wählen. Wie entsteht das Recordset?

 

D.h. ich kann nicht den Hauptbericht aufrufen mit

Code:

in welcher "suebergabe" auch die Infos für die Unterbericht enthält?

Mit dem Überspeichern des Berichtes hätte ich kein Problem, wenn es funktionieren würde mit

Code:

Aber aus irgendeinem Grund macht es das nicht.


Zu deiner Frage:

Aus einem Formular wird ein Datum herausgezogen.

Dies ist notwendig um das Recordset zu erstellen.

Dann muss 6 mal der Hauptbericht aufgerufen werden über eine Schleife, jedesmal ändert sich dann den Tabellen Überschriften der Unterberichte etc. (welche auch im Recordset liegen) und Seitenzahlen (liegen nicht im Recordset):

Code:

Wie gesagt das Änder klappt jetzt, es ist leider nur nicht dauerhaft was gerade bei den Unterberichten das Problem ist, der Hauptbericht kann ich als PDF speichern da wäre es kein Problem.

Bei der "OpenArgs-Variante" müsste ich glaube ich auch Daten irgendwo zwischenspeichern wenn ich halb wegs richtig verstehe (ist alles neu für mich). Da wäre mir das Überspeichern ehrlich gesagt am liebsten.


In dem Link sagt er das man noch etwas verändern muss bei visible und dann wäre eine speicherung möglich, geht das irgendwie?