- Welcome to Access-o-Mania.
Hilfe zu Microsoft Access und verwandten Produkten
Neueste Beiträge
#31
Access Programmierung / Re: Endlosformular nach drei F...
Letzter Beitrag von MzKlMu - September 02, 2026, 17:24:46Hallo,
Ein Formular ist auch keine selbständige Anwendung. Ein Formular erfordert Tabelle(n) und Abfragen. Datenquelle für ein Formular ist im Regelfall immer eine Abfrage.
Ich glaube, Du gehst da etwas blauäugig an die Sache heran.
Ich glaube auch nicht, dass da Access die richtige Anwendung ist, bzw. es mit Access gar nicht geht.
ZitatKann man die DB nicht in einem Format abspeichern, das auf allen Windows-Rechnern funktioniert?Nein, das geht nicht. Jeder der Deine DB öffnen (bzw. damit arbeiten will), braucht Access zwingend auf seinem Rechner. Mindestens in der kostenlosen Runtime Version. Was aber für Dich auch nicht einfach ist, denn eine Datenbank die man für eine Runtime Version erstellt, erfordert eine umfangreiche Programmierung durch den Entwickler (also DU), damit die DB überhaupt durch jemand anderes nutzbar ist.
Ein Formular ist auch keine selbständige Anwendung. Ein Formular erfordert Tabelle(n) und Abfragen. Datenquelle für ein Formular ist im Regelfall immer eine Abfrage.
Ich glaube, Du gehst da etwas blauäugig an die Sache heran.
Ich glaube auch nicht, dass da Access die richtige Anwendung ist, bzw. es mit Access gar nicht geht.
#32
Bericht / Re: Filterung anhand der ID's ...
Letzter Beitrag von Thüringer - September 02, 2026, 17:22:55Ich übergebe dann die Filterung an einen Bericht. Dazu sollen die angezeigten ID's ausgelesen werden und den Bericht weiter gegeben werden. Das funktioniert auch.
Code [Auswählen]
Private Sub Auswahldrucken_Click()
Dim strFilter As String
strFilter = Me.Filter
' Prüfen, ob ein Filter gesetzt ist
If Me.FilterOn And Len(strFilter) > 0 Then
DoCmd.OpenReport "ber_liste", acViewPreview, , strFilter
Else
' Wenn kein Filter aktiv, den Bericht ungefiltert öffnen
DoCmd.OpenReport "ber_liste", acViewPreview
End If
End Sub
#33
Bericht / Filterung anhand der ID's eine...
Letzter Beitrag von Thüringer - September 02, 2026, 17:17:01Hallo, ich filtere ein Formular mit 4 Listenfeldern wie folgt und habe dazu Fragen.
Der Code funktioniert.
Kann jemand hier Fehler erkennen?
Wozu steht in der folgende Zeile eine "- 2"?
Sieht jemand eine Lösung, die so gemachte Filterung mit einem Button von AND auf ODER umzuschalten? Müsste das über die folgende Zeile gehen derart, dass man da vielleicht eine Bedingung einbaut, die mit einem Umschaltknopf gesetzt wird?
Der Code funktioniert.
Code [Auswählen]
Private Sub Kombinationsfeld1_AfterUpdate()
Dim strFilter As String
If IsNull(Me.Kombinationsfeld1) Then
'Filter aufheben wenn Kombinationsfeld leer
Me.Filter = ""
Me.FilterOn = False
Else
'mehrwertige Felder desswegen .Value ansprechen
strFilter = "abrechnung.Value = " & Me.Kombinationsfeld1
Me.Filter = strFilter
Me.FilterOn = True
End If
End Sub
Private Sub Befehl_Filtern_Click()
Dim ctl1 As Control, ctl2 As Control, ctl3 As Control, ctl4 As Control
Dim varItem As Variant
Dim strFilter1 As String, strFilter2 As String, strFilter3 As String, strFilter4 As String, strTotalFilter As String
Set ctl1 = Me!Kombinationsfeld1 ' Name des ersten Listenfelds
Set ctl2 = Me!Kombinationsfeld2 ' Name des zweiten Listenfelds
Set ctl3 = Me!Kombinationsfeld3 ' Name des dritten Listenfelds
Set ctl4 = Me!Kombinationsfeld4 ' Name des dritten Listenfelds
' Filter für Kombinationsfeld1
If ctl1.ItemsSelected.Count > 0 Then
strFilter1 = "abrechnung IN ("
For Each varItem In ctl1.ItemsSelected
strFilter1 = strFilter1 & "'" & ctl1.ItemData(varItem) & "', "
Next varItem
strFilter1 = Left(strFilter1, Len(strFilter1) - 2) & ")"
End If
' Filter für Kombinationsfeld2
If ctl2.ItemsSelected.Count > 0 Then
strFilter2 = "stadt3 IN ("
For Each varItem In ctl2.ItemsSelected
strFilter2 = strFilter2 & "'" & ctl2.ItemData(varItem) & "', "
Next varItem
strFilter2 = Left(strFilter2, Len(strFilter2) - 2) & ")"
End If
' Filter für Kombinationsfeld3
If ctl3.ItemsSelected.Count > 0 Then
strFilter3 = "fachrichtung IN ("
For Each varItem In ctl3.ItemsSelected
strFilter3 = strFilter3 & "'" & ctl3.ItemData(varItem) & "', "
Next varItem
strFilter3 = Left(strFilter3, Len(strFilter3) - 2) & ")"
End If
' Filter für Kombinationsfeld4
If ctl4.ItemsSelected.Count > 0 Then
strFilter4 = "angebote IN ("
For Each varItem In ctl4.ItemsSelected
strFilter4 = strFilter4 & "'" & ctl4.ItemData(varItem) & "', "
Next varItem
strFilter4 = Left(strFilter4, Len(strFilter4) - 2) & ")"
End If
' Alle Filter mit AND verknüpfen
If strFilter1 <> "" And strFilter2 <> "" And strFilter3 <> "" And strFilter4 <> "" Then
strTotalFilter = strFilter1 & " AND " & strFilter2 & " AND " & strFilter3 & " AND " & strFilter4
ElseIf strFilter1 <> "" Then
strTotalFilter = strFilter1
ElseIf strFilter2 <> "" Then
strTotalFilter = strFilter2
ElseIf strFilter3 <> "" Then
strTotalFilter = strFilter3
ElseIf strFilter4 <> "" Then
strTotalFilter = strFilter4
End If
' Filter auf das Formular anwenden
If strTotalFilter <> "" Then
Me.Filter = strTotalFilter
Me.FilterOn = True
Else
Me.Filter = ""
Me.FilterOn = False
End If
End Sub
Private Sub FilteraufhebenAlle_Click()
Me.Kombinationsfeld1 = Null ' Kombinationsfeld zurücksetzen
Me.Kombinationsfeld2 = Null ' Kombinationsfeld zurücksetzen
Me.Kombinationsfeld3 = Null ' Kombinationsfeld zurücksetzen
Me.Kombinationsfeld4 = Null ' Kombinationsfeld zurücksetzen
Me.Kombinationsfeld4 = Null ' Kombinationsfeld zurücksetzen
Me.Filter = "" ' Filterstring leeren
Me.FilterOn = False ' Filter ausschalten
End Sub
Kann jemand hier Fehler erkennen?
Wozu steht in der folgende Zeile eine "- 2"?
Code [Auswählen]
strFilter1 = Left(strFilter1, Len(strFilter1) - 2) & ")"
Sieht jemand eine Lösung, die so gemachte Filterung mit einem Button von AND auf ODER umzuschalten? Müsste das über die folgende Zeile gehen derart, dass man da vielleicht eine Bedingung einbaut, die mit einem Umschaltknopf gesetzt wird?
Code [Auswählen]
strTotalFilter = strFilter1 & " AND " & strFilter2 & " AND " & strFilter3 & " AND " & strFilter4
#34
Access Programmierung / Re: Endlosformular nach drei F...
Letzter Beitrag von Thüringer - September 02, 2026, 16:51:49Das sind öffentliche Angaben, im Web abrufbar wie Kontaktnummer und Sprechstunden. Oder bei der Kassenärztlichen Vereinigung gibt es schon solche Listen, die aber etwas sperrig sind.
Die vom Patienten in der DB eingetragenen Anmerkungen werden von mir nicht gesammelt, es gibt keinen Rückfluss. Das bleibt einfach bei denen, zusammen mit der Instruktion zum Erstattungsverfahren.
Der Hintergrund ist, dass es zu wenige Therapeuten gibt und der Patient deshalb über das Erstattungsverfahren arbeiten soll. Dabei dokumentiert jeder Patient seine Bemühungen, einen Therapeuten zu finden, in der DB und wenn er genug zusammen hat und immer noch niemanden gefunden hat, reicht er das zusammen mit einem Antrag auf Erstattung bei der Kasse ein und bekommt einen Therapeuten, den man normalerweise privat bezahlen muss. Weil Pat kann dann nachweisen, dass er keinen Kassenzugelassenen gefunden hat und dann muss die Kasse einen privaten bezahlen.
@ekkehard
Jeder lernt anders. Ich lerne das durch abschauen von anderen und mit Versuch- und Irrtum. Das Einzige was ich nicht verstanden habe ist das von MzKlMu angemerkte Modell mit dieser Mittel-Tabelle.
Kann man die DB nicht in einem Format abspeichern, das auf allen Windows-Rechnern funktioniert?
Die vom Patienten in der DB eingetragenen Anmerkungen werden von mir nicht gesammelt, es gibt keinen Rückfluss. Das bleibt einfach bei denen, zusammen mit der Instruktion zum Erstattungsverfahren.
Der Hintergrund ist, dass es zu wenige Therapeuten gibt und der Patient deshalb über das Erstattungsverfahren arbeiten soll. Dabei dokumentiert jeder Patient seine Bemühungen, einen Therapeuten zu finden, in der DB und wenn er genug zusammen hat und immer noch niemanden gefunden hat, reicht er das zusammen mit einem Antrag auf Erstattung bei der Kasse ein und bekommt einen Therapeuten, den man normalerweise privat bezahlen muss. Weil Pat kann dann nachweisen, dass er keinen Kassenzugelassenen gefunden hat und dann muss die Kasse einen privaten bezahlen.
@ekkehard
Jeder lernt anders. Ich lerne das durch abschauen von anderen und mit Versuch- und Irrtum. Das Einzige was ich nicht verstanden habe ist das von MzKlMu angemerkte Modell mit dieser Mittel-Tabelle.
Kann man die DB nicht in einem Format abspeichern, das auf allen Windows-Rechnern funktioniert?
#35
Access Programmierung / Re: Formular aktualisiert nich...
Letzter Beitrag von Knobbi38 - September 01, 2026, 15:03:47Hier ist das mal ganz praktisch in deutsch erklärt:
http://www.dbwiki.net/wiki/VBA_Grundlagen:_Verwendung_des_%21-Operators
und hier etwas ausführlicher, allerdings in englisch:
https://eident.co.uk/2016/04/using-bang-dot-microsoft-access/
http://www.dbwiki.net/wiki/VBA_Grundlagen:_Verwendung_des_%21-Operators
und hier etwas ausführlicher, allerdings in englisch:
https://eident.co.uk/2016/04/using-bang-dot-microsoft-access/
#36
Access Programmierung / Re: Formular aktualisiert nich...
Letzter Beitrag von Beaker s.a. - September 01, 2026, 13:34:51Zitatgibt es im Internet zu hauf@Ulrich
Leider aber auch Widersprüchliches.
@Thüringer
Nimm lieber den ., dann hast du auch Intellisense.
Nach meinen Erfahrungen ist das ! nur in Abfragen mit Form-Bezug
(wenn man sie denn verwendet) zwingend.
#37
Access Programmierung / Re: Formular aktualisiert nich...
Letzter Beitrag von Beaker s.a. - September 01, 2026, 13:16:14Kannst du deinen Code mal im Zusammenhang posten.
Wenn das dieses ist,
von aussen ist auch nicht mehr möglich.
Warum willst du überhaupt von aussen (steuerndes Formular) auf
das UFo zugreifen?
Code [Auswählen]
DoCmd.Close acForm, Me.NameWelches Form ist das?Wenn das dieses ist,
ZitatAktuelle ID aus dem steuernden Formular merkendann gibt es nach dem Schliessen keine ID mehr, und ein Zugriff
von aussen ist auch nicht mehr möglich.
Warum willst du überhaupt von aussen (steuerndes Formular) auf
das UFo zugreifen?
#38
Access Programmierung / Re: Endlosformular nach drei F...
Letzter Beitrag von Beaker s.a. - September 01, 2026, 12:54:17Hallo,
du die DB nicht zurück bekommst, daran gar nicht arbeiten kannst.
Oder willst du nur bestimmte Daten und die Instruktionen versenden?
Dann brauchst du Berichte, die die Daten, per Abfrage, zusammen
fassen, und die du dann verschicken kannst.
I.Ü. ist das bei deinen Erfahrungen (Anfänger) ein ziemlich ambitioniertes
Vorhaben. Um damit voran zu kommen, und auch Spass daran zu haben, MUSST
du dich mit den Grundlagen beschäftigen; - ich habe es aus Büchern gelernt. Du findest
hier im Forum aber auch Links zu den Grundlagen (wurden wahrscheinlich
sogar schon gepostet).
gruss ekkehard
ZitatVielmehr soll die DB per Email verschickt werden.Wie soll das denn funktionieren? Das heisst doch, dass du, solange
du die DB nicht zurück bekommst, daran gar nicht arbeiten kannst.
Oder willst du nur bestimmte Daten und die Instruktionen versenden?
Dann brauchst du Berichte, die die Daten, per Abfrage, zusammen
fassen, und die du dann verschicken kannst.
I.Ü. ist das bei deinen Erfahrungen (Anfänger) ein ziemlich ambitioniertes
Vorhaben. Um damit voran zu kommen, und auch Spass daran zu haben, MUSST
du dich mit den Grundlagen beschäftigen; - ich habe es aus Büchern gelernt. Du findest
hier im Forum aber auch Links zu den Grundlagen (wurden wahrscheinlich
sogar schon gepostet).
gruss ekkehard
#39
Access Programmierung / Re: Endlosformular nach drei F...
Letzter Beitrag von Bitsqueezer - September 01, 2026, 12:53:56Hallo,
es wäre sinnvoll, zu Beginn einer Frage das Ziel aufzuzeigen.
Wenn ich Dich richtig verstanden habe, möchtest Du den zukünftigen Patienten eine Liste von Therapeuten in Datenbankform zusenden, und die Access-Anwendung soll ermöglichen, anhand von Kriterien des Patienten passende Therapeuten zu listen, die dann anhand von weiteren Informationen entsprechend kontaktiert werden können.
Prinzipiell OK, aber das bedeutet, daß der Patient auch einen PC mit Windows und Access (mind. die Runtime Version, die gratis ist) zur Verfügung hat.
Das trifft sicher nicht auf viele Benutzer zu.
Inwieweit Du dazu Therapeutendaten verschicken darfst, wäre dann noch eine datenschutzrechtliche Frage.
Ich würde zumindest von den Therapeuten eine Einverständniserklärung einholen, vielleicht möchten sie ja nicht in so einer Liste eingetragen werden.
Ich würde so ein Projekt auch definitiv als Web-Anwendung erstellen. Zum Beispiel mit MySQL bei einem Webhoster, das kostet je nach Anbieter sicher nicht mehr als 5€/Monat.
Der Webhoster sollte MySQL und PHP anbieten, dann kannst Du dort eine Datenbank anlegen (mit phpMyAdmin geht das recht einfach zu verwalten und ist bei der zu erwartenden Menge Tabellen/Daten auch nicht schwer zu erstellen).
Dann kannst Du ein einfaches Recherche-Tool mit z.B. Xataface erstellen:
https://xataface.com/
Das braucht keine PHP-Programmierkenntnisse, wird einfach mit einem Installer auf dem Webspace installiert und braucht nur ein paar Konfigurationen, um jede beliebige MySQL-Datenbank verwalten zu können. Damit kannst Du z.B. Filter-Formulare erstellen, aber ebenso auch Eingabeformulare.
So könnten Deine User einfach mit einem beliebigen Browser nach passenden Therapeuten suchen mit Eingabe entsprechender Filter. Das funktioniert dann auf allen internetfähigen Endgeräten, also auch Handies, Tablets usw. Der User muß dazu keine IT-Kenntnisse haben, außerdem muß er keine Mailadresse an Dich liefern, er kann also jederzeit selbständig Therapeuten suchen, ganz ohne Anmeldung und anonym. Was gerade bei Therapiepatienten sicherlich nicht unwichtig ist.
Und da es ein Webhoster ist, kannst Du auch entsprechende Infoseiten als ganz normale Webseiten erstellen, wobei die meisten Webhoster hierzu auch einfache Editoren anbieten. Alternativ kannst Du auch ein Webtool installieren, ein CMS (Content Management System) wie Joomla oder ein WordPress usw., außerdem kannst Du mit der gleichen Datenbank auch gleich ein Forum wie phpBB auf Deinen Webspace installieren, wenn Du Austausch zwischen Usern zulassen willst usw.
Ich persönlich würde einer mir zugesendeten Access-Datei nicht einfach so vertrauen, da man in VBA natürlich auch Viren einschleusen kann.
Gruß
Christian
es wäre sinnvoll, zu Beginn einer Frage das Ziel aufzuzeigen.
Wenn ich Dich richtig verstanden habe, möchtest Du den zukünftigen Patienten eine Liste von Therapeuten in Datenbankform zusenden, und die Access-Anwendung soll ermöglichen, anhand von Kriterien des Patienten passende Therapeuten zu listen, die dann anhand von weiteren Informationen entsprechend kontaktiert werden können.
Prinzipiell OK, aber das bedeutet, daß der Patient auch einen PC mit Windows und Access (mind. die Runtime Version, die gratis ist) zur Verfügung hat.
Das trifft sicher nicht auf viele Benutzer zu.
Inwieweit Du dazu Therapeutendaten verschicken darfst, wäre dann noch eine datenschutzrechtliche Frage.
Ich würde zumindest von den Therapeuten eine Einverständniserklärung einholen, vielleicht möchten sie ja nicht in so einer Liste eingetragen werden.
Ich würde so ein Projekt auch definitiv als Web-Anwendung erstellen. Zum Beispiel mit MySQL bei einem Webhoster, das kostet je nach Anbieter sicher nicht mehr als 5€/Monat.
Der Webhoster sollte MySQL und PHP anbieten, dann kannst Du dort eine Datenbank anlegen (mit phpMyAdmin geht das recht einfach zu verwalten und ist bei der zu erwartenden Menge Tabellen/Daten auch nicht schwer zu erstellen).
Dann kannst Du ein einfaches Recherche-Tool mit z.B. Xataface erstellen:
https://xataface.com/
Das braucht keine PHP-Programmierkenntnisse, wird einfach mit einem Installer auf dem Webspace installiert und braucht nur ein paar Konfigurationen, um jede beliebige MySQL-Datenbank verwalten zu können. Damit kannst Du z.B. Filter-Formulare erstellen, aber ebenso auch Eingabeformulare.
So könnten Deine User einfach mit einem beliebigen Browser nach passenden Therapeuten suchen mit Eingabe entsprechender Filter. Das funktioniert dann auf allen internetfähigen Endgeräten, also auch Handies, Tablets usw. Der User muß dazu keine IT-Kenntnisse haben, außerdem muß er keine Mailadresse an Dich liefern, er kann also jederzeit selbständig Therapeuten suchen, ganz ohne Anmeldung und anonym. Was gerade bei Therapiepatienten sicherlich nicht unwichtig ist.
Und da es ein Webhoster ist, kannst Du auch entsprechende Infoseiten als ganz normale Webseiten erstellen, wobei die meisten Webhoster hierzu auch einfache Editoren anbieten. Alternativ kannst Du auch ein Webtool installieren, ein CMS (Content Management System) wie Joomla oder ein WordPress usw., außerdem kannst Du mit der gleichen Datenbank auch gleich ein Forum wie phpBB auf Deinen Webspace installieren, wenn Du Austausch zwischen Usern zulassen willst usw.
Ich persönlich würde einer mir zugesendeten Access-Datei nicht einfach so vertrauen, da man in VBA natürlich auch Viren einschleusen kann.
Gruß
Christian
#40
Access Programmierung / Re: Endlosformular nach drei F...
Letzter Beitrag von Knobbi38 - September 01, 2026, 12:27:06Zitat von: Thüringer am September 01, 2026, 10:59:55Bestimmte Sachen sind aber nicht möglich, zum Beispiel kein FE/BE-Design, weil es keinen gemeinsamen Server gibt. Vielmehr soll die DB per Email verschickt werden.
Genau dann sollte man eine Trennung zwischen Frontend und Daten (BE) vornehmen, sonst verschickst du deine Datenbank und die Eingaben des Anwenders sind weg.