Access VBA OpenRecordset Error

Mac1206

Board Regular
Joined
Jun 3, 2016
Messages
184
I have a VBA code cmdSendRpt_Click() button that errors on Set rst = CurrentDB.OpenRecordset(strSql) and when I hover over the error it says rst = Nothing and I can't for the life of me understand why....

Private Sub cmdSendRpt_Click()

Dim rst As DAO.Recordset
Dim strSql As String

strSql = "Select * FROM Max_Pymt_EmailDetails;"

Set rst = CurrentDb.OpenRecordset(strSql)

Do While Not rst.EOF

Me.txtID = rst![ID]


DoCmd.SendObject acOutputQuery, "Max_Pymt_EmailDetail1", acFormatXLS, "email", , "This is just a test to email delivery", "Hello, this is working properly and we are on our way", False

DoEvents
rst.MoveNext


Loop


rst.Close

Set rst = Nothing


End Sub

This is my query:

SELECT Max_Pymt_PymtEmailDetail.ID, Max_Pymt_PymtEmailDetail.Email
FROM Max_Pymt_PymtEmailDetail;
 

Excel Facts

Test for Multiple Conditions in IF?
Use AND(test, test, test, test) or OR(test, test, test, ...) as the logical_test argument of IF.

Forum statistics

Threads
1,223,230
Messages
6,170,883
Members
452,364
Latest member
springate

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top