strSql = "SELECT tblPSHClients.[Entry Exit Provider Id], Count(tblPSHClients.[Client Uid]) AS [CountOfClient Uid] " & _
"FROM tblPSHClients " & _
"WHERE tblPSHClients.[Household Relate# Head Of Household] <> 'No' " & _
"GROUP BY tblPSHClients.[Entry Exit Provider Id] " & _
"HAVING tblPSHClients.[Entry Exit Provider Id]= " & vsql
This error generally means that one of your field names is unrecognized.