Supportnet Computer
Planet of Tech

Supportnet / Forum / Datenbanken

Tabellenherkunft in rowsource durch variable zuweisen - geht das ??





Frage

Hallo, hebe unteng. Code für eine recht komfortable Suchfunktion verwendet, allerdings mußte ich für jede Herkunftstabelle je ein neues Formular erstellen.( Alle Sätze in eine Tabelle geht nicht wegen gesamtanzahl und Geschwindigkeit ) Gibt es eine Möglichkeit, die Tabelle, die durchsucht werden soll, per Listenfeld als Variable festzulegen, und hier als "Tabellenname" zu übergeben ? Würde mir sehr helfen ! Private Sub txtFind_Change()`´Eingabefeld für Suchbegriff´ Dim sFind As String txtfind.SetFocus sFind = txtfind.Text ´Suchtextstring´ If Not sFind = "" Then lstErg.SetFocus ´ Listenfeld für alle Ergebnisse´ lstErg.RowSource = "SELECT [Tabellenname].ID, [Tabellenname].ArtNr, [Tabellenname].Bez1, [TabellennameBez2 From [Tabellenname] Where [Tabellenname].ArtNr Like ´" & sFind & "*´ Or [Tabellenname].Bez1 Like ´" & sFind & "*´;" lstErg.Requery txtfind.SetFocus txtfind.SelStart = 100 lstErg.Requery End If

Antwort 1 von weiwasnicht

Habs inzwischen rausgefunden - für alle die es interessiert:

Variable als String deklarieren ( zb Kombifeld.value )

"SELECT [" & Variable & "].ID,......

Ich möchte kostenlos eine Frage an die Mitglieder stellen:


Ähnliche Themen:


Suche in allen vorhandenen Beiträgen: