Supportnet / Forum / Datenbanken
Abfangen eines nicht markierten Datensatzes im Listenfeld
Frage
Hallo zusammen,
ich möchte aus einem Listenfeld einen angezeigten Datensatz löschen, sofern dieser markiert ist (nicht über doppelklick sondern einem einzelnen Buttoen). Wie kann ich den Fall abfangen, dass der User keinen Datensatz markiert hat?
Soll in MS Access SQL durchgeführt werden
Gruß
Jack
Antwort 1 von Teddy7
Hallo Jack !
In SQL geht das natürlich nicht - ist ja weder Abfrage noch Tabelle.
das geht nur mit VBA-Programmierung.
Hier mal ein Ausschnitt eines Beispiels:
If Not IsNull(Me(Listenfeldname).Column(0)) Then
'Anzahl der ausgewählten Zeilen feststellen
n = Me(Listenfeldname).ListCount - 1
'Zeilen durchlaufen und Werte der ersten Spalte in kommagetrennte Zeichenfolge schreiben
For i = 0 To n
If Me(Listenfeldname).Selected(i) Then
If Not varFirst Then
strListe = strListe & Me(Listenfeldname).Column(0, i)
Else
strListe = strListe & "," & Me(Listenfeldname).Column(0, i)
End If
varFirst = True
End If
Next
Müßtest Du natürlich für Deine Zwecke noch anpassen.
gruß
Teddy
In SQL geht das natürlich nicht - ist ja weder Abfrage noch Tabelle.
das geht nur mit VBA-Programmierung.
Hier mal ein Ausschnitt eines Beispiels:
If Not IsNull(Me(Listenfeldname).Column(0)) Then
'Anzahl der ausgewählten Zeilen feststellen
n = Me(Listenfeldname).ListCount - 1
'Zeilen durchlaufen und Werte der ersten Spalte in kommagetrennte Zeichenfolge schreiben
For i = 0 To n
If Me(Listenfeldname).Selected(i) Then
If Not varFirst Then
strListe = strListe & Me(Listenfeldname).Column(0, i)
Else
strListe = strListe & "," & Me(Listenfeldname).Column(0, i)
End If
varFirst = True
End If
Next
Müßtest Du natürlich für Deine Zwecke noch anpassen.
gruß
Teddy