Hallo Leute, ich bin echt am verzweifeln....
Ich habe eine schicke Auswertung von Versuchsreihen erstellt als Bericht, Balkendiagramm. Klappt einwandfrei!
Das ganze läuft über eine Abfrage, bei der ich dann die Versuchsnummer eingeben muß:
Parameter: Wie [Bitte die LNR eingeben:]
Okay.
Das Diagramm wird natürlich im Detailbereich des Berichts dargestellt und hat die Datensatzherkunft:
SELECT REZNR, MEDIUM, DGewicht, DHaerte, OHAUT FROM [Qu_WAAGE_X]
In der Abfrage sind auch noch der KUNDE und seine Nummer enthalten.
So, und nun mein Problem:
Ich möchte den Kunden und seine Nummer im SEITENKOPF angezeigt bekommen!! Meine FELDLISTE ist aber leer!
Alle Versuche diese zu lösen sind bisher fehlgeschlagen .... :-((
Hat jemand eine Idee????
Danke!!!
Hallo,
ja... ;)
Wie kommst Du zu der Annahme, dass die Feldliste (der Felder aus der Datenherkunft des Berichtes) gefüllt sein muß?
Gibt auch(!) dem Bericht eine Tabelle/Abfrage in seiner Datenherkunft oder extrahiere per VBA die Kdnr/den Kundennamen aus der Datensatzherkunft des Diagramms.
Datenherkunft des Berichtes und Datensatzherkunft des Diagramms sind zwei verschiedene Sachen.
Hi, danke Dir, aber ich bin wohl zu blond :D
Ich kriegs nich hin und mit den Feldliste wär's so schön einfach.
Wie könnte denn der Code aussehen, wenn ich das Feld KUNDE aus der Abfrage Waage_X im Textfeld angezeigt bekommen möchte?
=[Kunde] oder =Kunde() - geht nicht.
Me!Kunde.... - ???
Wenn ich im Code gucke, steht da auch nichts drin:
Option Compare Database
Private Sub Detailbereich_Format(Cancel As Integer, FormatCount As Integer)
End Sub
Private Sub Report_Open(Cancel As Integer)
End Sub
Hab echt keine Ahnung mehr ...
Grüße und danke!
Q9000
HAllo,
nimm die Abfrage für die Datenherkunft des Berichtes.
Nimm die gleiche Abfrage, aber ohne(!) den Abfrageparameter für die DAtensatzherkunft des Diagramms.
Verknüpf über geeignete Felder in den Diagramm-Eigenschaften "Verknüpfen von/nach"
Im Bericht hast Du dann Deine Feldliste...
Insgesamt ist die Verwendung von (solchen) Abfrageparametern nicht sehr zielführend...
Hi,
ich habe alles versucht, aber es funzt nicht.
Nach unzähligen Versuchen habe ich jetzt meine SELECT Anweisung rausgenommen und sowohl dem ganzen Bericht, als auch dem Diagrammbereich die Datenherkunft der Abfrage zugeordnet.
Theoretisch (auch praktisch) geht es jetzt, aber ich habe ein "Zirkelproblem" und muss meine Auswahlnummer (LNR) dreimal eingeben. Mal gucken, ob ich das wegbekomme.....
Hallo,
eigenes Zitat:
ZitatInsgesamt ist die Verwendung von (solchen) Abfrageparametern nicht sehr zielführend...
wirf die Parameter aus den Diagramm-Abfrage heraus und benutz die Verknüpfungseigenschaften...
Auch den Parameter in der Berichtabfrage kannst Du rauswerfen und den Bericht prinzipiell so aufrufen:
Sub btnButton_Click()
Docmd.Openreport "DeinBericht",acpreview,,"[Tabellenfeld]= '" & Me!MeinFormularkriterumsfeld & "'" ' im Fall von Datentyp Text
End Sub
Hallo Franz,
habe gerade gesehen dass meine LNR und die Kundennummer ZAHLENFELDER sind! Was ändert sich dann?
Habe versucht Deine Angaben zu übernehmen, das sieht im Formularschalter derzeit so aus:
Private Sub Befehl44_Click()
On Error GoTo Err_Befehl44_Click
Dim stDocName As String
DoCmd.OpenReport "re_externe_Auswertung_FA", acPreview, , "[LNR]= '" & Me!Befehl44 & "'" '
stDocName = "re_externe_Auswertung_FA"
DoCmd.OpenReport stDocName, acPreview
Exit_Befehl44_Click:
Exit Sub
Err_Befehl44_Click:
MsgBox Err.Description
Resume Exit_Befehl44_Click
End Sub
Muss hier: Me!MeinFormularkriterumsfeld & der Schalter (Befehl44) rein, oder etwas anderes?
Es kommt die Fehlermeldung: Objekt unterstützt diese Eigenschaft oder Methode nicht.
Im Diagramm habe ich den Diagrammbereich verknüpft von: (meine Abfrage) Qu_Waage_X
verknüpft nach: (mein Bericht) RE_externe_Auswertung_FA
Da kommt die Fehlermeldung:
Beim Senden von Daten an den OLE Server ist ein Fehler aufgetreten .....
Es wäre toll, wenn Du mir weiterhelfen könntest!! :)
Hallo,
Private Sub Befehl44_Click()
On Error GoTo Err_Befehl44_Click
Dim stDocName As String
stDocName = "re_externe_Auswertung_FA"
DoCmd.OpenReport stDocName, acPreview
DoCmd.OpenReport "re_externe_Auswertung_FA", acPreview, , "[LNR]= " & Me!LNR 'bei Zahl,Long
Exit_Befehl44_Click:
Exit Sub
Err_Befehl44_Click:
MsgBox Err.Description
Resume Exit_Befehl44_Click
End Sub
Im Form-Textfeld Me!LNR steht der akt. Wert der benötigten LNR (Was auch immer die bedeuten mag) drin.
Hallo Franz,
ich habs gerade versucht:
Private Sub Befehl44_Click()
On Error GoTo Err_Befehl44_Click
DoCmd.OpenReport "re_externe_Auswertung_FA", acPreview, , "[LNR]= " & Me!LNR
Exit_Befehl44_Click:
Exit Sub
Err_Befehl44_Click:
MsgBox Err.Description
Resume Exit_Befehl44_Click
End Sub
Leider kommt die Fehlermeldung:
Firma "XY" kann das in Ihrem Ausdruck angesprochene Feld 'LNR' nicht finden.
??? Ich glaub der sucht an falscher Stelle oder so, den Fimrmennamen habe ich oben im Startformular stehen und im Startformular ist ja auch der Butten für den Bericht ..... seltsam.
Das LNR Feld (ist übrigends eine Nummer für ein Versuchsergebnis) hat den Typ Zahl, aber Double! Macht das was aus?
Danke sag! :)
Hallo,
naja , ich kenne Deine Datenstrukturen nicht.....
LNR gibt es halt in einer der Abfragen nicht...., bzw. irgendwo in irgendeiner Daten(satz)herkunft.
Wieso "Double" als Kennung für ein Versuchsergebnis?
Das macht schon was aus, wenn Dezimalstellen angezeigt werden bzw. wenn man mit Rundungserscheinungen rechnen muß.
DoCmd.OpenReport "re_externe_Auswertung_FA", acPreview, , "[LNR]= " & Str(Me!LNR)
Hallo Franz,
doch, meine Abfrage und der Bericht sollen ja über die LNR gefiltert werden. Da ist das Feld ja drin.
Auf die Ursprungstabellen habe ich keinen Einfluss, ich habe sie nur verknüpft in meine Datenbank. Das mit den Rundungen hat den Grund, dass die Ergebnisse nicht genauer angezeigt werden sollen, als sie eigentlich sind.
Habe gerade wieder angepaßt, aber leider die gleiche Fehlermeldung.
Auch wenn ich den Bericht per Hand öffne, kommt er nicht mit den Verknüpfungen von/nach klar .....
Echt kompliziert ...
Gruß Günter
Hallo Franz,
zumindest der Bericht als solches funktioniert wieder.
Datenherkunft: meine Abfrage Qu_Waage_X
Verknüpfen von: LNR
Verknüpfen nach: LNR
Immerhin ein Anfang ... :) Wenn wir den Button auch noch hinkriegen ....
Gruß Günter
Hallo,
der muß auch funktionieren, wenn Du im Formular ein ungebundenes Textfeld einbaust, in das der akt. geforderte LNR-Wert eingeben wird.
wobei dieser ominöse Double-Wert evtl. vorher gerundet werden muß, bzw. ein Bereich für das Kriterium benutzt werden muß:
DoCmd.OpenReport "re_externe_Auswertung_FA", acPreview, , "[LNR] between " & val(Str(Me!LNR))-0.01 & " and " & val(Str(Me!LNR))+0.01
falls die 2-Stellen-Genauigkeit zur Definition eines LNR-Wertes ausreichend ist.
Hallo Franz,
wie gesagt, der Bericht als solches funktioniert wieder. Er holt sich die Daten aus der Abfrage und fragt mich nach der LNR. Gut.
Aber meine Ausgangsfrage: Ich kann auch jetzt noch nicht die Kundendaten einbinden im Berichtskopf....
und
in meinem Startformular möchte ich nur Buttons haben und keine Textfelder für Auswahlen ...
und der Programmiertext funktioniert so nicht ...
Keine Ahnung was zu tun ist.
LG Günter
Hallo Franz,
es funktioniert!!!! Endlich, nach 5 Tagen Bastelei :) :) :) :)
Ich habe das Textfeld ins Startformular genommen, wie Du geschrieben hattest.
Aber dann fehlte noch ein entscheidender Schritt, ich habe im Bericht, im Seitenkopf auch die LNR als Textfeld eingefügt. Daraufhin hat Access auch die Datenherkunft akzeptiert und mir die Feldliste gegeben, aus der ich nun auch den Kunden nehmen kann. Klasse!
Tausend Dank Dir dafür!! 8)
Jetzt muß ich diese Vorgehensweise noch für drei weitere Berichte adaptieren .....
;) ;) ;)
Hallo,
na, geht doch... :D