Originariamente inviato da Astharot
Più che problema con access è un problema di VB, quello che chiedevo è il codice in VB per eseguire ciò che ho chiesto sopra, cioè muovere il risultato di una select in una variabile che dovrò utilizzare successivamente in una insert dopo averla modificata sommandoci 1. Tutto questo in VB

OK, vedo che non capisci.
Il codice te l'ho già dato (la query).

Non è un problema di VB, perchè quella è una query ed è indipendente da linguaggio.
MSAccess è un ambiente diverso da VB6 o dal NET; trattandosi di VBA è più simile al VB6 che al NET ma oggetti, funzioni e metodi sono o possono essere diversi.
In VB6 io farei così (scrivo al volo)
codice:
Dim ProssimoNumero as Long
Dim CN As ADODB.Connection
Dim rs As ADODB.Recordset
Dim sSQL As String
Set CN = New ADODB.Connection
CN.Connectionstring = <connessione al database>
CN.Open

sSQL = "SELECT Max(Progressivo) + 1 FROM tabella"
Set rs = CN.Execute(sSQL)
If Not rs.EOF Then
    ProssimoNumero = rs.Fields(0).Value
End If
Vedi qualche attinenza con il VBA?

Scusa, come la esegui la INSERT di cui parli?
Ecco, allo stesso modo eseguirai la SELECT che ti ho indicato, no?


Ciao