Openr report in VBA Not working after windows 11 update

PhilUp

Registered User.
Local time
Today, 14:57
Joined
Mar 4, 2015
Messages
63
Hi,
I have been running this VBA for years, however since yesterday after the security update from Microsoft, it does nort work anymore.
Private Sub Command117_Click()
Dim stReportName As String
Dim stLinkCriteria As String

If Me.Dirty Then
Me.Dirty = False
End If

DoCmd.SetWarnings False
DoCmd.OpenQuery "UpdateFileName", acViewNormal, acEdit
DoCmd.SetWarnings True

If Forms!Sales.Language = "F" Then
stReportName = "InvoiceReportF"
ElseIf Forms!Sales.Language = "D" Then
stReportName = "InvoiceReportD"
Else: stReportName = "InvoiceReport"
End If
stLinkCriteria = "[InvoiceID]=" & Me![InvoiceID]
DoCmd.OpenReport stReportName, acViewReport, , stLinkCriteria
End Sub

It bugs, highlighting the last command.

Woud greatly appreciate any help.
 
And the error is? :(
On what report is it failing?
 
Can you roll back your OS update just to see if the problem goes away?
 
OK so what version / build does it work in and which version / build broke it? Which update channel are you on?
 
I am on this last update (KB5077181) (26100.7840)
Since it is working, I will lave it as is.

Thank you ll for your help.
 
I am on this last update (KB5077181) (26100.7840)
Since it is working, I will lave it as is.

Thank you ll for your help.
Windows is going to want to apply that update again?
 
I am on this last update (KB5077181) (26100.7840)
Since it is working, I will lave it as is.

Thank you ll for your help.
You didn't supply the Office version, build and update channel.

Are you absolutely sure it was caused by a Windows update and not an Office update?
I ask as that not only seems more likely but I've heard of another similar report in Office 365 version 2603.
 

Users who are viewing this thread

Back
Top Bottom