type mismatch error in Access after upgrading to Office 2021

Question

After recently upgrading from Office 2010 to Office 2021, a report fails with a type mismatch error. I've made no changes to the code, and it still works in Access 2010. In addition to the code below, RecCount is declared Public Integer.

The references are: Visual Basic For Applications; Microsoft Access 16.0 Object Library; OLE Automation; Microsoft Outlook 16.0 Library; Microsoft ActiveX Data Objects 2.1 Library.

Any suggestions would be greatly apreciated.

Answer 1

You've commented out this line:

' MsgBox "RecCount = " & RecCount

What happens if you replace it with

MsgBox "RecCount = " rst.RecordCount

before attempting to assign that recordcount to the variable.

Answer 2

Same problem.

It's erroring on the RecCount = rstRec.RecordCount statement.

Answer 3

So that appears to confirm that the problem is in the properties of the ado recordset in the current version of Access. There was a recent bug that might be related to this. I have to track it down, though, as it's been a few days and I don't have the reference at hand. While I search, perhaps someone will recall the bug.

Answer 4

Do yiou have Option Explicit set? Where do you Dim RecCount?

Answer 5

At the beginning of the module.

Option Compare Database

Option Explicit

Public NxtPgNum, RecCount As Integer, MlgRate As Currency