Deine MS-Office-Version: 2007
Suite Deines Office Pakets: Professional plus / Ultimate / Enterprise
AddIn installiert: Nein
Dein Wissensstand: Einsteiger

Welches Virenschutz-Programm hast Du installiert? Bitdefender
Betriebssystem Version: windows xp

Was hast Du gemacht, bevor das Problem aufgetreten ist?


Was hast Du bereits versucht um das Problem zu lösen?
Mit Makros und VBA-code herumgemurkst. Hab davon aber überhaupt keine Ahnung.

Fehlerbeschreibung und Nachricht
Aus einer Stammdatenbank kann ich ich die Anzahl aller (Anzahl(*)) Datensätze abfragen. In der selben Abfrage kann ich auch die Anzahl weiterer Items (-SummeWert(xyz)) ermitteln. Zur Ermittlung der Häufigkeiten bestimmter Ereignisse benötige ich in den entsprechenden Abfragen die o. g. Werte als Variablen um z. B. die %-Raten in Bezug auf die Gesamtzahl der Datensätze oder auf die in der ersten Abfrage ermittelten Teilmengen zu errechnen.
Die vielleicht etwas undurchsichtige Formulierung meines Problems sei Beleg dafür, dass ich überhaupt keine Ahnung habe. Makro- und VBA-programmierung sind mir ein Rätsel. Ich komme eben nur soweit, wie mir Access mit intuitiver Programmführung behilflich ist. Ich bitte deshalb möglichst um Nachsicht und eine Hilfe step-by-step for dummies. Vielen Dank!

Hallo,

Globale Variablen werden in einem Standard Modul, im Deklarationsbereich eingerichtet.

Code: Alles auswählen

Option Compare Database
Option Explicit

Public DeineGlobaleVariable As Long
oder:
'Public DeineGlobaleVariable As String


Diese kannst Du mittels einer Funktion in einer Abfrage verwenden. Siehe dazu http://www.donkarl.com?FAQ3.15

Vielen Dank für die schnelle Antwort! Den donkarl-Hinweis hatte ich schon gefunden. Leider hat mir dies, wie auch Deine Antwort nicht helfen können, da mir schlichtweg bestimmte Grundlagen fehlen.
Ich nehme mal an Das Modul wird mit

Option Compare Database
Option Explicit
Public VARIABLE As Long

erstellt. Was ist der Unterschied zwischen Long und String?
Wie weise ich der VARIABLE zum Beispiel den Wert: Anzahl aller Datensätze in der DB zu?
Muss ich dann der donkarl-Empfehlung noch eine Funktion deklarieren um die Variable aufzurufen?

Ich bitte an meiner Unbedarftheit nicht zu verzweifeln!

Danke!

surgeon

Hallo,

Was ist der Unterschied zwischen Long und String?

Long ist eine Zahl
String ist ein Text

s.a. http://www.ms-office-forum.net/forum/sh ... p?t=105283

Wie weise ich der VARIABLE zum Beispiel den Wert: Anzahl aller Datensätze in der DB zu?

In dem Du in einer Function z.B. folgende Zeile einfügst:

Code: Alles auswählen

VARIABLE = nz(DCount("*","tblDeineTabelle"),0)

Hallo Gunter,

herzlichen Dank! Der Nebel scheint sich zu lichten. Ich habe jetzt ein Modul mit Variablendeklaration und eine Funktion

Option Compare Database
Option Explicit
VarAlle = Nz(DCount("*","Darmzentrum"),0)

Public VarAlle As Long
_____________________________________________________________________

Public Function fctSendVar()

fctSendVar = VarAlle

End Function

Ist das richtig? Wenn ja, wie muss ich dieses Modul nun in eine Abfrage einbinden bzw. die Funktion aufrufen?

Nochmals vielen Dank!

surgeon

Hallo,

Nein ist nicht ganz korrekt.

Code: Alles auswählen


Option Compare Database
Option Explicit

Public VarAlle As Long
_____________________________________________________________________

Public Function fctSendVar() As Long

VarAlle = Nz(DCount("*","Darmzentrum"),0)
fctSendVar = VarAlle

End Function


in der Abfrage kannst Du mittels:

Code: Alles auswählen

fctSendVar() 

auf den Wert zugreifen

z.B. als Kriterium in der Abfrage:

Code: Alles auswählen

=fctSendVar() 

oder als neues Feld in der Abfrage:

Code: Alles auswählen

NeuesFeld:fctSendVar() 

Hallo,

ich bin einfach zu blöd. Egal, wo ich die Funktion =fctSendVar() eintrage wird ein Kompilierungsfehler gemeldet. Der Erwerb eines über 1000-seitigen Access-Handbuchs hat mich auch nicht schlauer werden lassen. Irgend wie will sich dieses Programm mir nicht erschließen. Ich werde wohl auf eine Eingebung warten müssen. Ich danke nochmals meinem unerschrockenen Helfer ...

surgeon