Ciao A tutti ,
cerco di salvare nella variabile strSql in un modulo di classe Access questa select:

strSql = ""
strSql = strSql & "SELECT BusAttuale "
strSql = strSql & " FROM Tabella1"
strSql = strSql & " WHERE Data =(SELECT Max(Data) FROM TABELLA1"
strSql = strSql & "WHERE OBLITERATRICE='" & VObliteratrice & "'"

VBusAttuale = strSql
Set DBS = CurrentDb()
Set RS = DBS.OpenRecordset(strSql)
RS.Close


dove '" & VObliteratrice & "'" è il parametro passato

soltanto che in fase di esecuzione di debug Access dice che c'è un errore nella punteggiatura della select.
Non riesco a capire dove.
Qualcuno sa indicarmelo???