locate code section for Form and KeyDown, and set as follows:
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyPageUp Then KeyCode = 0: Exit Sub
If KeyCode = vbKeyPageDown Then KeyCode = 0: Exit Sub
End Sub
"Outside of a dog, a book is probably man's best friend; and inside of a dog, it's too dark to read" - G. Marx
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.