Office: Access SQL Abfrage über Formular erstellen ?

Ich benutze "noch" access 97 *frown.gif*

Ja das ganze muss mit Excel verschickt werden !

Ich hab einen Datenbank in der ich jeden Monat neue Daten einspiele und dann werden 40 Abfragen ausgeführt die mit Hilfe von einem Makro Excelsheets erstellen und das ganze per Email verschicken die Abfragen Filtern dann immer nach dem Aktuellen Monat !

(Month([Datum]))=Month(Date()) AND (Year([Datum]))=Year(Date());


So funkt auch alles super nur leider kann es jetzt mal sein das meine Kollegen verpennen und Daten aus dem vergangenen Monat brauchen !

Darum wollte ich noch ein Formular erstellen mit 4 Eingabefeldern in dem sie Ihre Kriterien Angeben können und dann per Knopfdruck das Ergebnis in ein Excel Speichern um das dann wieder zu verschicken !

Ich hatte auch die Idee alle 40 Abfragen so zu machen das ich in einem Formular 2 Eingabe felder habe und zwar Monat und Jahr (die Tage spielen keine rolle !)

Dann kann ich fürs Datum 07 angeben und fürs Jahr 2004 und dann kann ich eins der Buttons betätigen (hab für jede abfrage ein Button damit wird dann automatisch die Email verschickt) und dann wird anstelle des aktuellen Monat und Jahr die daten aus den Eingabefeldern genommen hab nur leider GAR KEINE AHNUNG WIE ICH DAS ANSTELLEN SOLL *frown.gif*

mir macht das ganze zwar Spaß aber ich hab leider weder einen Kurs noch ein Buch oder sonst was gemacht hab mir mal kurz SQL so weit wie möglich beigebracht und versuch das jetzt noch mit VB


P.S. eure HILFE ist echt Klasse

Ich hoffe das war jetzt nicht zu kompliziert !

 

Ja Datum ist Text !

Soll ich es ändern oder kann ich auch so damit Arbeite ?

 

40 Abfragen? *eek.gif* Vermutlich könnte dort doch etwas vereinfachen? Von Makros solltest du in Access lieber Abstand nehmen.

Wenn die Daten nur dargestellt werden sollen, könnte man auch einen Bericht verwenden und diesen versenden.

Erstelle einfach mal eine Abfrage, die irgendwas enthält (wird eh überschrieben).

Nun machst du beim Klicken folgenden Code:

Code:

Damit sollte ein Export der gewählten Daten in das Excel-File passieren.

Zu deinem Datumsproblem:

Dazu sollte man den SQL-String anpassen

Code:

 

SUPER es hat Funktioniert !

Nur das mit dem Datum noch nicht das hab ich erstmal weggelassen !


Die 40 Abfragen haben 40 Berichte *wink.gif*

Ich hab 2 Funktionen Senden An (da werden die Berichte versendet) und einfach nur Senden das ist dann ein Makro und die empfänger stehen schon drin !

Leider kann ich da nix vereinfachen ! Es sind Monatlich ungefähr 120000 Datensätze die hinzukommen und die müssen eben gefiltert werden bis vor kurzem haben das die Kollegen hier noch von Hand mit Excel gemacht *wink.gif*

Ich bin jetzt neu hier und hab gesagt das ich da mal was mit Access macht könnte das funktioniert ja auch ist bestimmt noch nicht die Profi Lösung aber das wird hoffentlich noch *Smilie


Auf jeden wird mir hier Super geholfen !

Ich bedanke mich schonmal !

 

Ganz so viele DS habe ich nicht, aber ich komme mit 3 Abfragen und 3 Berichten aus. Alles andere mache ich in VBA *wink.gif*

Ist in diesen 40 Abfragen/Berichten immer etwas anderes drin oder unterscheiden sie sich nur im Kirterium?

BTW Schon gevotet? *biggrin.gif*

 

Sie unterscheiden sich eigentlich nur im Kriterium !

Und Zwar in 3

Es gibt Werk0 , LOA , Zusatz

2 Beispiele:



Beispiel 1: Werk0 = Alle, LOA = 881, Zusatz = P

SELECT *
FROM Stammdaten
WHERE LOA = '881'
AND Zusatz='P'
AND (Month([Datum]))=Month(Date()) AND (Year([Datum]))=Year(Date());


Beispiel 2: Werk0 = alle außer 096 LOA = 903, Zusatz = M

SELECT *
FROM Stammdaten
WHERE LOA = '903' AND Zusatz ='M'
AND Werk0 IN ('010','020','030','000','019','050','060','067','069','054')
AND (Month([Datum]))=Month(Date()) AND (Year([Datum]))=Year(Date());


Also anstelle von Werk IN hääte ich auch IS NOT oder so machen können aber ich war zu Faul ;-)

Na ja auf jeden Fall hab ich das so gemacht es kann auch mal sein das es keinen Zusatz und so weiter gibt !


Ich hab gleich mal noch ne Frage kann ich es auch so machen das ich beim Export in das Excelsheet gefragt werde wie die Datei heißen soll ?

Das mit dem datum hab ich so gemacht das ich es als Text gelassen habe dann muss ich auch nichts mit dem Format machen das Datum ist sowieso nur als Schlüssel da um redudanzen zu verhindern (Das jemand die Daten aus einem Monat 2 mal einspielt)


P.S. werd gleich mal Voten ! *Smilie

 

Code:

Wenn der Pfad immer gleich ist, dann kann man den auch fest mitgeben. Ansonsten hilft nur ein FileDialog.

Wegen solchen Abfragen erstellst du 40 Abfragen? *entsetzt

Das geht auch dynamisch! Dann benötigst du wesentlich weniger. So kann man sich zB auch das SQL-Statement dynamisch zusammensetzen und dann als Variable an die Datenherkunft an einen Bericht übergeben.

 

Das das geht hab ich schon gehört aber wie ???

Ich bin ein absoluter neuling hast du vielleicht ne Quelle zum Nachlesen ich werde das ganze dann umstrukturieren kannst dir ja vorstellen das die Performance auch nicht so doll ist bei der ganzen Sach *wink.gif*

 

Als Minianfang könntest du mal dem Link "Abhängigkeiten" in meiner Signatur folgen.