Excel og Access SQL problem

Hej

I en projektmappe har jeg en userform med mange optionbuttons der henter data fra Access (der består af mange checkboxe med samme navne som optionbuttons). Følgende kode skal hente data fra Access udfra valget af optionbutton kaldet: "Område" men følgende fungerer selvfølgelig ikke:

Private Sub CommandButton1_Click()
Dim område As String
Dim ctrl As Control
    For Each ctrl In Me.Controls
        If ctrl.Value = True Then
            område = ctrl.Caption
        End If
    Next ctrl

    Dim rsData As ADODB.Recordset
    Dim szConnect As String
    Dim szSQL As String
    Dim c As Variant
    Dim iBox As String
    Dim strSQL As String
    Dim sPath As String
   
    sPath = ActiveWorkbook.Path & "\"
   
    ' Create the connection string.
    szConnect = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source =" & sPath & "gps.mdb;"

'------Her går koden forkert:
    szSQL = "SELECT * FROM Salgsområder WHERE Checkbox.caption(område) =  True"
'------- 
   
    Set rsData = New ADODB.Recordset
    rsData.Open szSQL, szConnect, adOpenForwardOnly, adLockReadOnly, adCmdText

    If Not rsData.EOF Then
      listen = TransposeDim(rsData.GetRows)
      UserForm2.Caption = "List af Firmaer med" & " " & område & " " & "som salgsområde"
      UserForm2.Show
    Else
        MsgBox "Ingen fundet", vbCritical
'        UserForm1.ListBox1.Clear
    End If
   
    Set rsData = Nothing

End Sub