Zählerverbrauch errechnen
Alois Huber
ich als Neueinsteiger in Access97 habe eine Datenbank über
Energieabrechnung erstellt, da mir es leid ist, daß unsere
Energieabrechnung in der Arbeit über ca. 15 verschiedene
Excel-Dateien zu erledigen.
Ich bin jetzt auf ein Problem gestoßen, wo ich leider
nicht mehr weiter finde. Ich habe eine Tabelle mit
folgenden Spalten:
Datum (Prim-Schl.)
Zähler 1
Zähler 2
Zähler 3
usw.
Unter Datum wird das Ablesedatum gespeichert, und unter
den einzelnen Zählern der Zählerstand um 00.00 Uhr. Jetzt
soll ich die Tagesverbräuche und die Monatsverbräuche
berechnen. Wie funktioniert das, kann mir jemand
weiterhelfen.
mit bestem Dank im vorhinein
Alois Huber
Martin Baier
>-----Originalnachricht-----
>
'Das Tagesdatum und die einzelnen Zählerstände solltest Du
jeweils in einem Array speichern.
Dim Datum(100)
dim Zaehler(100)
'dann trägst Du jeweils die einzelenen Daten zu den
einzelnen Nummern ein
Datum(1) = #29/08/03#
Zähler(1) = 29292
So hast Du erstmal zu jedem Datum den passenden
Zählerstand Datum(1) = Zaehler(1)
Für jeden anderen Zähler machst Du das genauso. Für jeden
Zähler ein eigenes Datum.
Dann kannst du mit einer for - schleife die aktuellen
Daten und die dazugehörigen Daten abfragen und verwerten.
GesZaehler = 0
for i = 1 to 100
'Blindgänger filtern
if Datum(i)<>"" then
'Zählerdatum abfragen für 1 Monat
if Datum(i) >= #01/08/03# and Datum(i) <= #01/08/03#
then
'wenn Datum innerhalb des erwünschten Zeitraumes
liegt dann
GesZaehler = GesZaehler + Zaehler(i)
end if
end if
next i
msgbox "GesamtZähler ist: " & GesZaehler
Sie können das ja weiter entwickeln.
Wichtig ist immer nur: Es muss zu jedem Zähler ein Datum
existieren. Das ist anders als in Excel, wo man einfach
nur ein Datum als Überschrift schreibt.
Access als Datenbank arbeitet nun mal anders als Excel.
Eine Tabelle könnte dann so aussehen (das würde auch
funktioneren - braucht man nicht so viel programmieren):
Datum Zaehler1 Zaehler2
28.08.03 2555 2553
29.08.03 2557 2554
usw.
Hoffe Dir geholfen zu haben.
M.Baier
Jürgen Volke
>ich als Neueinsteiger in Access97 habe eine Datenbank über
>Energieabrechnung erstellt, da mir es leid ist, daß unsere
>Energieabrechnung in der Arbeit über ca. 15 verschiedene
>Excel-Dateien zu erledigen.
>
>Ich bin jetzt auf ein Problem gestoßen, wo ich leider
>nicht mehr weiter finde. Ich habe eine Tabelle mit
>folgenden Spalten:
>
>Datum (Prim-Schl.)
>Zähler 1
>Zähler 2
>Zähler 3
>usw.
und hier solltest du erst mal eine andere Tabellenstruktur wählen:
Id autowert Primärschlüssel
Zähler-Nr
Datum
Stand
>Unter Datum wird das Ablesedatum gespeichert, und unter
>den einzelnen Zählern der Zählerstand um 00.00 Uhr. Jetzt
>soll ich die Tagesverbräuche und die Monatsverbräuche
>berechnen. Wie funktioniert das, kann mir jemand
>weiterhelfen.
du solltest dir erst mal klar werden, ob das ganze als Bericht,
oder als Formular realisiert werden soll.
du kannst mit der DLOOKUP-Funktion auf jeden beleibigen
Wert in deiner Tabelle zugreifen.
HTH Jürgen
Peter Steimann[MVP Access]
"Alois Huber" <hube...@planet-interkom.de> schrieb im Newsbeitrag
news:087801c36e0f$d6845f30$a601...@phx.gbl...
Hallo,
>ich als Neueinsteiger in Access97 habe eine Datenbank über
>Energieabrechnung erstellt, da mir es leid ist, daß unsere
>Energieabrechnung in der Arbeit über ca. 15 verschiedene
>Excel-Dateien zu erledigen.
>Ich bin jetzt auf ein Problem gestoßen, wo ich leider
>nicht mehr weiter finde. Ich habe eine Tabelle mit
>folgenden Spalten:
>Datum (Prim-Schl.)
Solltest Du nicht als Feldname nehmen, da dies ein reservierter Ausdruck
ist. Nimm Ablesedatum o.ä.
Zähler 1
Zähler 2
Zähler 3
usw.
>Unter Datum wird das Ablesedatum gespeichert, und unter
>den einzelnen Zählern der Zählerstand um 00.00 Uhr. Jetzt
>soll ich die Tagesverbräuche und die Monatsverbräuche
>berechnen. Wie funktioniert das, kann mir jemand
>weiterhelfen.
z.B. mit einer Parameter-Abfrage.
Wo willst Du die Werte darstellen? Formular, Bericht?
Gruss
Peter
Mark Doerbandt
* Alois Huber (Fr, 29 Aug 2003 09:27:59 GMT):
> Unter Datum wird das Ablesedatum gespeichert, und unter
> den einzelnen Zaehlern der Zaehlerstand um 00.00 Uhr. Jetzt
> soll ich die Tagesverbraeuche und die Monatsverbraeuche
> berechnen.
Dein Problem ist wahrscheinlich, dass Du einen anderen Datensatz
brauchst, um die Differenz zu berechnen. Da hilft Dir DLookup und
DMax, z.B. so
SELECT
Z.Stand,
Z.Ablesedatum,
Z.Stand -
DLookUp("Stand",
"Zaehlerstand",
"Ablesedatum=#" &
Format(
Nz(
DMax(
"Ablesedatum",
"Zaehlerstand",
"Ablesedatum < #" &
Format(Z.Ablesedatum,"yyyy-mm-dd") &
"#"),
Z.Ablesedatum),
"yyyy-mm-dd") & "#")
AS Verbrauch
FROM Zaehlerstand As Z;
... wenn Deine Tabelle die Felder Stand und Ablesedatum enthaelt.
Fuer mehrere Zaehler musst Du ein zusaetzliches Feld Zaehler haben und
dieses in die SQL-Bedingung einbauen.
Gruss - Mark
--
Informationen fuer Neulinge in den Access-Newsgroups unter
http://www.doerbandt.de/Access/Newbie.htm
Bitte keine eMails auf Newsgroup-Beiträge senden.