Listenfeld nach Änderung aktualisieren (VBA) :: Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office

Einloggen, um private Nachrichten zu lesen

Downloads

[Access 2003] Listenfeld nach Änderung aktualisieren (VBA)

Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office Foren-Übersicht » Microsoft Access Hilfe

Autor

Nachricht

Chrisgeisi
Newbie
Newbie

Anmeldedatum: 17.03.2008
Beiträge: 1

Verfasst am: 17.03.2008, 12:56

Hallo zusammen!

Ich hoffe, ihr könnt mir helfen, ich bin langsam echt am verzweifeln..

Ich habe ein Listenfeld, was mit Daten aus einer Abfrage gefüllt ist:

Code:

Me!liste.RowSource = "SELECT id AS [ID-Nummer], test1 AS [bla], test2 AS [blubb] FROM tab"

so, nun klickt man ein oder mehrere Zeilen an (Mehrfachauswahl) um die zu löschenden Datensätze auszuwählen (klappt auch wunderbar)

Code:

Dim db As Database
Dim xindex As Variant
Set db = CurrentDB
For Each xindex In Me.liste.ItemsSelected
db.Execute ("DELETE FROM tab WHERE id = " & Me.liste.ItemData(xindex))
Next xindex
db.close

So, nachdem die Datensätze gelöscht sind, soll natürlich die Liste wieder aktualisiert werden, weil sie ja nicht mehr stimmt ;)

Code:

Me!liste.Requery

Wo wir nun auch beim Problem wären: Die Aktualisierung geht nur manchmal! Ich sollte noch erwähnen, dass das Löschen und Aktualisieren über den selben Button ablaufen soll. Mach ich die Aktualisierung über einen anderen Button (also in einem anderen Sub, dann gehts..).

Ich suche schon seit Wochen im Internet, aber ich finde einfach nichts passendes.. :( Ich hab langsam das Gefühl, dass es was mit der Menge der Befehle in einem Sub zu tun hat, aber ich hab einfach keine Erklärung dafür.. Wenn ich versuche, den Fehler zu reproduzieren, also ein neues Forumular mit nur den nötigen Dingen, dann geht natürlich alles..

Bitte helft mir!

Danke!

cya Chris

jens05
Newbie
Newbie

Anmeldedatum: 16.04.2008
Beiträge: 16

Verfasst am: 16.04.2008, 20:01

Hallo,
du könntest ein DoEvents mal dazwischen setzen, um Access etwas Zeit zu gönnen, oder du versucht anstatt des Requerys mal folgendes

Code:

Me!liste.RowSource = Me!liste.RowSource

Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office Foren-Übersicht » Microsoft Access Hilfe

Thema		Autor	Forum	Antworten	Verfasst am
Ähnliche Beiträge
	Druckerprobleme nach Installation Com...	hein61	Microsoft Word Hilfe	0	16.05.2008, 16:33
	Dateiverlust nach syncronisierung mit...	Zappa02	Microsoft Windows Hilfe	4	15.05.2008, 14:43
	Nach schließen des Formulars sind Dat...	Axmexx	Microsoft Access Hilfe	0	14.05.2008, 14:25
	KeyPress-Ereignis zum aktualisieren d...	miriki	Microsoft Access Hilfe	0	14.05.2008, 10:56
	Querverweise automatisch aktualisieren	kot69	Microsoft Word Hilfe	1	30.04.2008, 13:09

Gehe zu:

Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum posten
Du kannst Dateien in diesem Forum herunterladen

Powered by phpBB © 2001, 2002 phpBB Group :: FI Theme :: Alle Zeiten sind GMT + 1 Stunde
Deutsche Übersetzung von phpBB.de