Microsoft Access - Custom Form Navigation Buttons

Illustrating how we can create our own custom navigation system/buttons for Microsoft Access forms to replace the default navigation controls at the bottom of the form.
In the second part of the video, I then demonstrate how we can take the traditional module coding approach and port it to a Class Module so we can reuse the behavior via Sub Classing in any form to standardize the code and events throughout an entire application and simplify overall database development.
Article(s) on this Subject:
Regular form approach
• www.devhut.net...
Form Class Module/Sub Classing approach
• www.devhut.net...
Previous Article(s) on this Subject:
• www.devhut.net...
• www.devhut.net...
• www.devhut.net...
My Links:
• www.cardaconsu... (business)
• www.devhut.net/ (blog)

[@MarcusDieterle]

This article came to the right time. I just started to move my navigation button code into a class module and here it is the full solution.

[@DanielPineault]

Check my blog to copy the code and the demo database.

[@bumpersmith]

As always good job, you go the extra mile.

[@DanielPineault]

Thank you, I appreciate the comment.

[@alializadeh8195]

Thanks

[@DanielPineault]

My pleasure, glad it is something you find useful.

[@hassanrozh6579]

awesome, what about the search and filtering, thanks so much.

[@DanielPineault]

That may come in a future video. Not sure how much more I will cover. I just wanted to give a basic introduction to introduce the subject/concept.

[@hichamhadj9640]

This is awesome , thank you for sharing. Can we use With o.Form... End With inside of the class module to avoid repetition?

[@DanielPineault]

Of course you can.

[@neojumpy]

Another godd example to make the move to a class-solutuion I would change the following line: cmd_RecNav_New.Enabled = True like this: cmd_RecNav_New.Enabled = (Me.AllowAdditions AND not me.RecordsetType=2) 'Snapshot

[@DanielPineault]

Yes, I can see that as being a smart approach to take.

[@DanielPineault]

Actually, correct me if I'm wrong, but don't you mean cmd_RecNav_New.Enabled = (Me.AllowAdditions AND me.RecordsetType 2)

[@neojumpy]

@@DanielPineault like this u have double negation (Me.AllowAdditions AND NOT me.RecordsetType 2) mayb u didnt c the "NOT"

[@DanielPineault]

Indeed, you are correct. I somehow missed that! Time for another cup of coffee. Sorry about that.

[@DanielPineault]

Hey, wait a minute, I copy/paste from your original comment. You've updated it since. Nice one. Lol. You had me seriously second guessing my sanity for a moment.