Set conn = New ADODB.Connection
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=
& Worksheet.mdb
sqlstring = "DELETE FROM Table1"
conn.Execute sqlstring
conn.Close

Set conn = New ADODB.Connection
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source="
Worksheet.mdb

Dim Recordset1 As ADODB.Recordset
Set Recordset1 = New ADODB.Recordset

Recordset1.Open "SELECT * FROM Table1"
"Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & Worksheet.mdb, adOpenStatic, adLockOptimistic




Myrna Larson Wrote:
Can you post the rest of your code, specifically the line(s) that ope
the
recordset?

On Fri, 5 Nov 2004 13:41:14 -0600, silvest
wrote:


Hi, i'm not too familiar with VBA in Excel, but i'll try my best.

I'm trying to run a macro that'll generate numbers and fit it into
Access DB (which i've created using another macro)

the loop seems to be running fine, but an error occurs saying
"Either
BOF or EOF is TRUE, or the current record has been deleted. Requested
operation requires a current record."
and points towards this line: "

-- Recordset1.Update <--
Recordset1.Close
Set Recordset1 = Nothin

--
silves
-----------------------------------------------------------------------
silvest's Profile: http://www.excelforum.com/member.php...fo&userid=1466
View this thread: http://www.excelforum.com/showthread.php?threadid=27574