SQL Sætning med variabler?

Jeg har en "Standard" Søgnings streng, som jeg gerne vil smide en variable ind i istedet for at skal lave en helveds masse Copy Past, men et par ændriger i!

Jeg kalder eks min sub sådan her:
SearchHovedFlangen "Flat_Face_Flange"

"Flat_Face_Flange" = Den tabel som den skal kigge i!

Så kalder jeg min streng sådan her:
Public Sub SearchHovedFlangen(FlangeTabel As String)
Dim MinB As Long
MinB = CLng(FRM_HovedFlange.txtb.Text -

FRM_HovedFlange.txtbDifference.Text)
Set datDB = DBEngine.Workspaces(0).OpenDatabase(App.Path & "\Flanger.mdb")

strSQL = "Select DISTINCT Varenummer FROM FlangeTabel Where D <= " & txtd1.Text & " AND B <= " & txtb.Text & "AND B >= " & MinB & ""

Set rsSøgning = datDB.OpenRecordset(strSQL)
rsSøgning.MoveFirst
lstListe.Clear

Do Until rsSøgning.EOF
On Error Resume Next
lstListe.AddItem rsSøgning("Varenummer")
rsSøgning.MoveNext
Loop

rsSøgning.Close
Set rsSøgning = Nothing
End Sub



Men hvordan får jeg den til at forstå at det er en variable og ikke en TABEL der hedder FlangeTabel, men at det er en variable???