[Access 97] Inserimento select sql in moduli di classe -- Punteggiatura

[Elena78]

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???

[Elena78]

AUTOCORRETTA.
Mancava la chiusura della parentesi della select annidiata