Me.Form.Requery starts an endless loop

Question

Hi

Having a pushbutton with the simple code:

Private Sub Kommandoknapp669_Click()
Me.Form.Requery
End Sub

It starts and endless loop with a blinkning screen.
Blinking stops when I shift to another app, like Word or whatever.

Windows 10 64bit, Access 2016 32 bit.

Why? The code has previously worked without any problems.

---

Best // Peter Forss Stockholm GMT +1.00

Answer 1

Just tested on my Win 10 V_1607 Enterprise with Office 365 (2016)

Cannot reproduce the issue.

Have you tried

1. running a compact and repair?
2. Creating a new Form?

to test the results?

---

Just takes a click to give thanks for a helpful post or answer.
Please vote “Helpful” or Mark as “Answer” as appropriate.
Chris Ward
Microsoft Community Contributor 2012

Answer 2

Hi Forss,

Do you have any code running in your Form's Current event, which may be "refreshing" the data such as changing the form's Record Source, for example?

Answer 3

Hi KCDW

Yes I have tried compact and repair.

A new form with the code has no problems.

Will now check DBguys advice

---

Best // Peter Forss Stockholm GMT +1.00

Answer 4

Hi DB

You are good! I had code running at the forms OnGotFocus Property. Change that code and now the lines:
Private Sub Kommandoknapp669_Click()
Me.Form.Requery
End Sub

Is doing its job, without a loop.

Thank you very much.

---

Best // Peter Forss Stockholm GMT +1.00

Answer 5

Hi Peter,

Glad to hear you got it sorted out. Good luck with your project.