Code Snippet Details

<- Back to List


Language
VBA
Description
Access - Generic Ribbon
Code
<customUI xmlns="http://schemas.microsoft.com/office/2009/07/customui" onLoad="Navigation_OnRibbonLoad"> <ribbon startFromScratch="true"> <tabs> <tab id="UserTab" label="Main Process" getVisible="Navigation_GetVisible"> <group id="User_InformationGroup" label="Information" > <button id="User_Information_Dashboard" label="Dashboard" screentip="System welcome screen" imageMso="AdvancedFileProperties" onAction="Navigation_OnOpenForm" tag="DashboardView" getEnabled="Navigation_GetEnabled" size="large" /> <button id="User_Information_SupportInformation" label="Support Information" screentip="Check system configuration and history" imageMso="ChooseForm" onAction="Navigation_OnOpenForm" tag="SupportInformationView" getEnabled="Navigation_GetEnabled" size="large" /> <button id="User_Information_Help" label="Help" screentip="View help guides" imageMso="Help" onAction="Navigation_OnOpenForm" tag="HelpView" getEnabled="Navigation_GetEnabled" size="large" /> </group> </tab> <tab id="DeveloperTab" label="Developer" getVisible="Navigation_GetVisible"> <group id="Developer_MaintenanceGroup" label="Maintenance" > <button id="Developer_CustomRibbon" label="Ribbon" screentip="Maintain the custom ribbon XML" imageMso="BusinessCardInsertMenu" onAction="Navigation_OnOpenForm" tag="CustomRibbonsView" getEnabled="Navigation_GetEnabled" size="large" /> <button idMso="DatabaseLinedTableManager" label="Linked Table Manager" screentip="Show the Linked Table Manager" onAction="Navigation_HandleAction" getEnabled="Navigation_GetEnabled" size="large" /> </group> </tab> </tabs> </ribbon> <backstage> <button idMso="ApplicationOptionsDialog" visible="false"/> <tab idMso="TabPrint" visible="false"/> <button idMso="FileExit" visible="true"/> </b> </customUI>