Runtime Error 3061 Too few parameters. Expected 1

[Thompyt]

I get the subject error when running the following code at the Red Bold after selecting the Forms Unbound Combobox "Titelz":

Private Sub OpenMyQuery_Click()    Dim RU As DAO.Recordset
    Dim strSQL As String, Title As String, strQuery As String
    Dim RCnt As Integer
    
    strSQL = "SELECT QryROM.* From QryROM WHERE (((QryROM.Titels)=[Forms]![FrmROM]![Titlez]));"
  
    Set RU = CurrentDb.OpenRecordset(strSQL)  
        
End Sub

If I run Query1 with the SQL view after selecting the Forms Unbound Combobox "Titelz"

SELECT QryROM.*FROM QryROM
WHERE (((QryROM.Titels)=[Forms]![FrmROM]![Titlez]));

the query runs correctly.

I cannot use this strSQL as a reordset?

[moke123]

Assuming titlez is a string

strSQL = "SELECT QryROM.* From QryROM WHERE  QryROM.Titels = """ & [Forms]![FrmROM]![Titlez] & """"

[Thompyt]

Thanks moke123. I figured it had something to do with "'s