Zum Inhalt springen

Access: Listenfeld per Mausklick mit neuen Daten Aktualisieren


Empfohlene Beiträge

Geschrieben

Hi,

Ich bin momentan dabei mich in Access zu üben :)

Leider kriege ich nich hin, was ich will... ich erkläre mal kurz was ich vor habe...

Ich habe ein Listenfeld: In diesem Listenfeld werden alle Kunden aus einer Tabelle ausgelesen.

Datensatzherkunft: SELECT DISTINCT Organization FROM [neueabfrage];

Dann gibt es ein zweites Listenfeld: Hier stehen alle einzelnen Aufträge usw zu dem Kunden.

Datensatzherkunft: SELECT [Liste17], [neueabfrage].[Category], [neueabfrage].[DateOpened] FROM [neueabfrage]

Bei einem Doppelklick auf einen unden im ersten Listenfeld soll das zweite Listenfeld nun aktualisiert werden.

Hier sollen nun alle Daten zum gewählten Kunden stehen.

Ich hoffe es kann mir jemand weiterhelfen :)

Geschrieben

Hi!

Für das Listfeld gibt es verschiedene Ereignisse, zB. 'beim DoppelKlicken'.

Bei diesem Ereignis sagst Du dann ein fach:

----------------------------------------------------------------------

Private Sub DeineListe_DblClick

Dim SQL as String

SQL = "SELECT [Liste17], [neueabfrage].[Category], [neueabfrage].[DateOpened] FROM [neueabfrage]

WHERE KUNDEID = " & Me.DeineListe.Column(Spalte)

Me.DeineListe.RowSource = SQL

End Sub

----------------------------------------------------------------------

Ich gehe mal davon aus, dass jeder Kunde eine eindeutige Nummer hat. Ich habe diese mal KUNDEID genannt. Spalte ist die Spalte in Deinem Listfeld, wo diese eindeutige Nummer des Kunde drinsteht.

Gruss

Geschrieben

Ich habe das mal angepasst und das ganze sieht nun so aus:

--------------------------------------------------------------------------------

Private Sub Liste17_DblClick(Cancel As Integer)

Dim SQL As String

SQL = "SELECT [Liste17], [neueabfrage].[Category], [neueabfrage].[DateOpened] FROM [neueabfrage] "

WHERE Organization = " & Me.Liste17.Column(Spalte) "

Me.DeineListe.RowSource = SQL

End Sub

--------------------------------------------------------------------------------

Doch leider klappt das ganze noch so ganz ;)

Ist noch irgendwie ein fehler in:

WHERE Organization = " & Me.Liste17.Column(Spalte) "

genau inm wort Organization ....

Die Daten werden aus einer Abfrage (neueabfrage) genommen.

3 Spalten:

Organization, DateOpened, Category

und es sollen halt alle angeben von Organization genommen werden.

Dein Kommentar

Du kannst jetzt schreiben und Dich später registrieren. Wenn Du ein Konto hast, melde Dich jetzt an, um unter Deinem Benutzernamen zu schreiben.

Gast
Auf dieses Thema antworten...

×   Du hast formatierten Text eingefügt.   Formatierung wiederherstellen

  Nur 75 Emojis sind erlaubt.

×   Dein Link wurde automatisch eingebettet.   Einbetten rückgängig machen und als Link darstellen

×   Dein vorheriger Inhalt wurde wiederhergestellt.   Editor leeren

×   Du kannst Bilder nicht direkt einfügen. Lade Bilder hoch oder lade sie von einer URL.

Fachinformatiker.de, 2024 by SE Internet Services

fidelogo_small.png

Schicke uns eine Nachricht!

Fachinformatiker.de ist die größte IT-Community
rund um Ausbildung, Job, Weiterbildung für IT-Fachkräfte.

Fachinformatiker.de App

Download on the App Store
Get it on Google Play

Kontakt

Hier werben?
Oder sende eine E-Mail an

Social media u. feeds

Jobboard für Fachinformatiker und IT-Fachkräfte

×
×
  • Neu erstellen...