Datenbankfunktion per VBA
21.01.2005 14:51:40
Matthias
ich habe folgendes Problem. Aus einer Access-Datenbank werden automatisch Datensätze eingelesen. Diese Datenbanksätze sollen per VBA-Macro ausgewertet werden (Tabellenfunktion DBANZAHL). Eine entsprechende Prozedur für diese Tabellenfunktion konnte ich noch nicht erstellen, da ich die Syntax für die Kriterienabfrage nicht kenne.
Das Hauptproblem ist allerdings, dass die Datensatzanalyse Datums-abhängig gestaltet wird, in der Form, dass per Stichtag (z.B. 10.1.2005) alle Datensätze ermittelt werden, die dem Monat Januar 2005 (aus dem Stichtag Monat und Jahr) mit den entsprechend anderen vordefinierten Kriterien entsprechen. Eine Beispieldatei habe ich vorbereitet, die meinen sehr komplizierten Ansatz aufzeigt. Der Stichtag wird per Textfeld, das auch mit einem Drehfeld verändert werden kann, eingegeben. Per Code erfolgt eine gültige Datumsabfrage und der Curser wird in die entsprechende Zeile gesetzt. Mein weiterer Ansatz wäre aus dem Stichtag den Tag herauszufiltern mit der Tabellenfunktion (siehe Zelle K9 aus dem Tabellenblatt "Daten") und diese Zahl vom Stichtag abziehen, um die beiden Datemswerte als Kriterien zu verwenden (somit bekommt man den entsprechenden Zeitraum). Leider kann ich diese Sache nur über den Zugriff des Tabellenblatts (in diesem Fall "Daten") erledigen.
Es wird automatisch eine neue Menüleiste erzeugt, mit der man dieses Programm aufrufen kann, allerdings z.Z. nur bis zum Abschluss der Datumseingabe und der Ausgabe der Gesamteingangszahl.
Die Datei liegt unter folgendem Link: https://www.herber.de/bbs/user/16557.xls
Ich würde mich sehr freuen, wenn ich einen besseren und reinen VBA-Ansatz bekommen könnte.
Vielen Dank für die Mühe!
Tschüß
M a t t h i a s