Hallo community,
ich versuche gerade einen Bericht zu erstellen von meiner Abfrage. In dem Bericht wird ein Balkendiagramm dargestellt.
Der Bericht wird durch eine mit dem Assistenten erstellten Bedienschaltfläche aufgerufen.
Dabei wurde automatisch ein Code erstellt.
Leider kommt der Bericht erst nach der Meldung:
Die Aktion /die Methode ist ungültig, da das Formular bzw. der Bericht nicht an eine Tabelle oder Abfrage gebunden ist.
Wie kann ich diese Meldung unterbinden?
Der Code wurde automatisch erstellt:
Private Sub cmdAnzeigen_Click()
On Error GoTo Err_cmdAnzeigen_Click
Dim stDocName As String
stDocName = "rptgemittelterAbsatz"
DoCmd.OpenReport stDocName, acViewReport
DoCmd.OpenReport "rptgemittelterAbsatz", acViewPreview, , "month(created_at = " & Me.cboMonat
Exit_cmdAnzeigen_Click:
Exit Sub
Err_cmdAnzeigen_Click:
MsgBox Err.Description
Resume Exit_cmdAnzeigen_Click
End Sub
Vielen Dank für eure Hilfe
Liebe Grüße Lisa
P.S. Wie kann ich die Beschriftung im Diagramm händlich ändern? Geht das überhaupt, da das ja auch über einen Assistenten erstellt worden ist.
Reduziere den Code aufPrivate Sub cmdAnzeigen_Click()
On Error GoTo Err_cmdAnzeigen_Click
DoCmd.OpenReport "rptgemittelterAbsatz", acViewPreview
Exit_cmdAnzeigen_Click:
Exit Sub
MsgBox Err.Description
Resume Exit_cmdAnzeigen_Click
End Sub
@Lachtaube
Danke funktioniert jetzt mit dem
Code:
Private Sub cmdAnzeigen_Click()
On Error GoTo Err_cmdAnzeigen_Click
DoCmd.OpenReport "rptgemittelterAbsatz", acViewPreview
Exit_cmdAnzeigen_Click:
Exit Sub
Err_cmdAnzeigen_Click:
MsgBox Err.Description
Resume Exit_cmdAnzeigen_Click
End Sub
Sorry, da habe ich geschludert.
Füge im Code hinter Exit Sub in einer neuen Zeile Err_cmdAnzeigen_Click: ein.
Ja hab es selbst noch rausgefunden ;)
Hallo,
Was mich ja wundert ist warum hier
ZitatDoCmd.OpenReport "rptgemittelterAbsatz", acViewPreview, , "month(created_at) = " & Me.cboMonat
nicht schon der Compiler eine gelbe Flagge geworfen hat,
und wo dieser Filter am Ende geblieben ist, - vermutlich schon in der
Abfrage.
gruss ekkehard