Making a Custom Ribbon in Microsoft Access - Part 4

The VBA that allows our ribbon to "make something happen".
**The XML used in this video can be found here:
accessjitsu.com...
A custom ribbon in an Access application can serve two purposes. It can be part of a strategy to keep users from accidentally making design changes to an application you have built. It can also add a nice bit of "polish" to an application, giving it a more professional look by providing easy access to features provided by the application.
In this video we will:
1. Write VBA to make ribbon buttons open forms
2. Write VBA to enable and disable ribbon buttons based on form usage
3. Add the necessary attributes to the ribbon XML to interact with this VBA
This will be a multi-part series. In subsequent videos we will discuss how to add custom images that you have created.
All of my videos organized by topic and other blog topics:
accessjitsu.com/
The previous videos in this series explain how we got to this point.
Making a Custom Ribbon in Microsoft Access - Part 1
• Making a Custom Ribbon...
Making a Custom Ribbon in Microsoft Access - Part 2
• Making a Custom Ribbon...
Making a Custom Ribbon in Microsoft Access - Part 3
• Making a Custom Ribbon...

[@Steven_Schuyler]

CAUTION !!! --- Hey, Access Jitsu, your a GREAT teacher and I am learning a lot from you! Maybe I missed it, but it might be possible that you simply forgot to tell people to be sure to have their Microsoft Office Library Objects turned on in order for some of this code to work!

[@mag1cmushr00m4]

Your videos are excellent and deserve more views. I have only gone as far as adding some groups I required to allow users to sort and filter datasheets while using a runtime version of Access. Much appreciated, thankyou!!

[@Accessjitsu]

+Mag1cMushr00m Cool, thanks.

[@RungeCarl]

Great video!

[@reyanthonysaguid1154]

Your videos are very helpful and easy to understand. i hope you make more videos like these.

[@elricho72]

Thanks for sharing ! Excelent videos, you forget to say that you have to reference to Office Object Library to work, :-) Work Great on access 2016

[@reggietedesco9191]

Excellent videos. Thank you for posting them. I cant wait to get back to work to try them

[@janserpieters568]

Great videos! Could it be that the links to the XML code no longer work?

[@mellowcrow]

ControlEnabled Sub Tip: the enabled paramater must be declared as a Variant (which it is implicitly in Access Jitsu's presentation), not a Boolean.

[@ssdusd]

Awesome Series 👌 Can you explain how to use Macros with xml? For example On Open run this Macro from xml Can we let xml to Auto run Macro? Instead of clicking on?

[@kerrydoolgar9079]

Thank you for responding I will try it.

[@erwinvonk70]

Dear Access Jitsu, Great series these videos. Nice and very clear. Up till now all is werking like a charm. But then the vb scipts for performing the actions. Access 2016 does not recognize the IribbonUI objject and IRibbonControl control. What did I miss?

[@RungeCarl]

The links do not work?

[@abrahamchahla5115]

Very helpful tutorials. I have a situation, lets say i have a form in datasheet view, i add a ribbon for this form, in this ribbon i have a button to delete the current selected record in the datasheet form. How can i pass a parameter to the action of the delete button based on the ID of the selected record to run a procedure to delete the selected record in the in the form? Thank you in advance!!

[@josephwagner2]

Loving these videos, But I have a question. I have followed along and tweaked for my use, but anything after the 3rd button the report is loaded but the button is not disabled. I have change the name numerous times but nothing is working.

[@Oswee]

Looks like this does not work on 2016.

[@kerrydoolgar9079]

Hi the videos are great, getting the ribbons to do something. I followed this video and the ribopen and getenabled etc., works. However, whenever I preview my form to print, and return to the form, the ribbon no longer works properly. I can click to open a form, but the other feature in this video, where a form is grayed out when chosen no longer works. Any ideas? Thanks.

[@Accessjitsu]

This may be an issue of which form events I put the InvalidateControl code in. Form_load only fires once, when the form is opened. I don't think it fires again if you go from open to preview. You may need to put that code somewhere like form_current or form_activate.

[@DingusBatus]

Hi there Access Jitsu. I know it's been a while since anybody last commented on these video but I'm wondering if you are still checking in on them? If you are I'm wondering if you can help? First of all GREAT videos. I've watched all 9 on the is topic a few times and started trying things out. I have some VBA skills learnt from college a few years back (on Access 2003) and I'm building a "Desktop Database" in Access 2013 and thought I'd try customising the Ribbon and move some controls off the Form onto the Ribbon and learn something new. Keeping things as per your videos the "Text Formatting" tools aren't working. not even on the standard tabs. Instead it's a small popup thing when hovering over select text. I suspect it's a new thing in Access 2013? maybe something to do with being a "Desktop Database"? Maybe should be a "Custom Web App"? Also Video #6 the Contextual Tabs aren't aren't working. Not in "Form View" anyway. Switching to "Layout View" and the tab is there but the buttons on it aren't. Any ideas? I have screen capture capabilities and can record video or just do screen shoots should you request them to help with clarifying things. Many thanks for the great videos. I have "definitely" learned something from them.

[@Accessjitsu]

+Debbie Heaney Hi Debbie. The text formatting tools should work on a desktop database. However, there is only going to be ONE place I can think of that they will work: a textbox that has its "Text Format" property set to Rich text. And then, they will only work when your cursor is in that text box. Regular text boxes, combo boxes, list boxes, etc, don't allow any sort of formatting so the text formatting controls will disable themselves when those types of controls have the focus. I probably neglected to mention that in the video - there is so much that needs to be mentioned, I always forget something. I'm going to need more info on the contextual tabs, they are more complicated. Can you send me the XML?

[@neilvv]

Great videos !! Unfortunately I can not open your website ?

[@justskatinby]

I'll check my links! Thanks for the heads up.

[@Accessjitsu]

+N.F.P. Verschoore I'm sorry you're having trouble with the links in the video description. The links are working for me, I'm stumped.

[@neilvv]

+Access Jitsu Sorry but I found out that my antivirus package blocks your website (without a message). I added the site as trusted. Now I can access the site. :-(

[@MrTuancuongac5]

Hi, Thanks for this helpful video. I am developing a tiny application based on Access 2010 with custom ribbons. I encounter this error message when hit a ribbon button: "Cannot run the macro or callback function "ribClick"..." I checked the function name carefully and watch your video twice, but cannot fix that problem. Please help me out.

[@Accessjitsu]

+Tuấn Cường Please check to make sure "ribClick..." is in a code module and not a form - it must be in a module. Also, make sure "ribClick..." is declared as "Public" and not "Private".

[@MrTuancuongac5]

+Access Jitsu Thanks so much for your help. I can create ribbons after adding Office Object Library to my project! BTW I follow your guide to make a user's permissions when the ribbon loading, by disabling the buttons that user not allowed to click. But your instruction for this matter seems not work... I am much appreciated if you share with me this technique! Thanks Jitsu!

[@Accessjitsu]

+Tuấn Cường let me review what I have in that video, maybe a more in depth video is in order.

[@Accessjitsu]

+Access Jitsu Where are you having issues? Are you not successfully getting a user name? Are you getting a user name but the control is not responding to your user name test? I'm about to film a video on two ways to get user names, and also adding a user group table to the mix, and using user names or user groups to enable controls.

[@franciscocastaneda7060]

Maybe someone else still having this problem... I solved it for Access 2016 as the library who contents these Ribbon objects such as ""IRibbonControl" is not enabled. Please go to Visual Basic (ALT +F11) and then in Tools/References look for " Microsoft Office 16.0 Object Library" and check it... restart access and then it should work.

[@RichardMaitland-k7l]

Hi The following code indicates that Access cannot run the macro or calback function ribOpenForm Public Sub ribOpenForm(control As IRibbonControl) DoCmd.OpenForm (control. Tag) End Sub - I don't see what is wrong

[@timothybrannon1950]

Was cruising along using Access 2016 until I added the onAction="ribOpenForm" line to my RibbonDeveloper.xml. I keep getting an error code 0x800004005 in the Custom UI XML of my database. The attribute "OnAction" on the element '{schemas.microsoft.com/office/2009/07/customui}button" is not defined in the DTD/Schema. Can you help me past this issue?

[@jimmyitwv]

I'm having a similar issue. After setting the form name for the tag of the button in the ribbon I can open the database fine without error. When I click on my "home" button I get the error, "Microsoft Access cannot run the macro or callback function 'ribOpenForm'.

[@jimmyitwv]

I am using Access 2013.

[@jimmyitwv]

I found the problem. The VBA editor didn't have objects for Office 15. Go to "tools" > "references" and check Microsoft Office 15.0 Object Library.

[@andreasjanisch7381]

@@jimmyitwv Thx for the hint! I tried to figure out for hours whats the problem. Finally its solved! Thx a lot!!! :)