Buongiorno,
chiedo agli esperti per questo errore che non riesco a capire:
Ho un foglio excel come tabella collegata contenente 41327 righe.
Ad un certo punto nel mio codice ne conto la quantità con
Dim numero As Integer
Dim rs As DAO.Recordset
'Questa riga sotto riporta nella variabile numero il numero di record presenti nel database indicato.
Set rs = CurrentDb.OpenRecordset("SELECT COUNT(*) AS numero FROM [MagazzinoComponenti]")
Debug.Print numero
Debug.Print rs("numero")
numero = rs("numero")
Durante l'esecuzione ottengo errore RunTime “6” Overflow.
Le due istruzioni Debug.Print mostrano 0 il primo e 41236 il secondo.
La riga che dà errore è l'ultima.
Ora, secondo Microsoft Learn una variabile integer è lunga 4 byte, quindi non dovrebbe dare errore con tali valori, quale potrebbe essere il problema ?
Grazie