Ms Access Dynamic Menu
ฝัง
- เผยแพร่เมื่อ 19 ส.ค. 2020
- With This Video You Can Learn how to create a dynamic Side Menu With Ms Access 2016
And Other Advanced Technique To Build Faster Your
Our Facebook Group :
/ 345768833121934
here is the function to do the job
Private Function SetBt()
Dim Ax As Single
Ax = CSng(Right(Me.ActiveControl.Name, 1))
For i = 1 To 7
Me("B" & i).BackColor = Box0.BackColor
Next
Me.ActiveControl.BackColor = Box1.BackColor
Me("P" & Ax).SetFocus
LB0.Caption = Me("B" & Ax).Caption
End Function - วิทยาศาสตร์และเทคโนโลยี
![[TH] VCT Masters Shanghai Playoffs DAY 3 // FNC vs FUT | EDG vs PRX](http://i.ytimg.com/vi/pw2T5v0ogDI/mqdefault.jpg)
Excelente explicación así como el contenido 🙂
Thank you for sharing.. looks very good!!!!
Great Video! Thank you.
You are such an artist! Excellent menu systems you have! I cannot find part 3 for the Dynamic Menus.
Side Menu 3 Ms Access Adavanced Login Form and User's Menu Controle
th-cam.com/video/aMVKySVYBrw/w-d-xo.html
Great video!!! Thank you!!!!!
I like where you're going with this video, though I personally hate tabs, they're more trouble than they're worth in my opinion. I like hiding the tabs, but why not eliminate the middleman. Don't use tabs, just add seven subforms and make them visible or invisible instead of setfocus. If you don't mind some suggestions: maybe go a bit slower, try to eliminate the static and background noise, it will be less distracting.
Thanks !
No no no don't add multiple subforms. Just add one subform control and change the record source in the VBA code
its a great implementation
What icon list are you using for your menu buttons at the beginning of your presentation, and where can we obtain the icon list? Interesting menu approach, thanks for sharing.
Hello. Very nice implementation. And thank you very much for the provided information.
I would like to ask a question. Would it be difficult if i wanted, instead of just plain buttons at the left for menu options, to create list box that brings the menu options from a menu table. This menu table will have MenuID as AutoNumber, MenuName as string and FormToBeOpened as string, MenuPic as string which will be a path to the disk where the image is stored). Or ever more to "simulate" this list box with a sub form menu. I thought about sub form menu, in case the menu options are changed dynamically based on user level, so menu pictures are changed dynamically as well. Alternatively, instead of having the tab control, i should have a sub form which will display the form based on the menu option i select from the left list box or menu sub form.
I know that it sounds line a custom navigation control and newer Access versions have embedded this control, but i would like to create from scratch in order to be compatible with older Access versions.
What should i take into consideration in the above implementations in your opinion?
P.S. The tab control is very good for displaying such information and i was given an idea by your video to create a wizard form based on tab control for specific data entry.!!
i think that is simple to implament... you can the same function under the menu button , to list on click,....
Hi Sir Sissoko,
Really appreciate your work and if possible I wanna learn from you...
Hi M Anafof Issa , thanks for the great comment …
you dont need code to make the buttons highlighted: just use the "focus colour" property of the bottom to your highlight colour and access does the rest!
Hello friend! I wrote the code exactly as you indicated but it's not working. Do I need to enable some reference in my access?
This is great, can you tell me how to use those additional tabs which you touch upon. I'd like one tab to have some buttons which open other tabs to site sub forms/datasheets
You , mean add more tab on left , or right, side ?
@@sissokom.prodev9979 yes, in your video you added 2 more tabs to the right but didn't really explain how to link them
You can check the next video ! You need to see all the video of side menu DB , to understand well
This is great 😍😍😍😍😍😍😍😍
Thanks ! :)
Thank your
I would like to be able to view all the menus as well as the entire database in sequential tutorials.
Hi thank you great tutorial! just a question how to use the side button to navigate between the pages? without using the label part
I don’t understand your question !! Since the code : pagename.setfocus can show any page … so ….
@@sissokom.prodev9979 Ops i missed this part! thank you
Wonderfull
Why my Access 365 is not the same as yours after I clicked at Create (a blank database)?
good morning I started following your tutorial, I got stuck in coloring the buttons, I did everything like you did
"Private Function SetBt()
For i = 1 To 7
Me("B" & i).BackColor = Box0.BackColor
Next
Me.ActiveControl.BackColor = Box1.BackColor
End Function"
What am I doing wrong?
good job
Thanks
Thank you for your instructions, they are really helpful. I have 2 questions:
1. If I am using quick style to color the background of my command buttons, how do I find the code for the color and gradient of the quick style chosen to make the code you have shown work?
2. What is the name of the video that shows how to set up security for the buttons, that was mentioned at the end of this video?
Thanks again for all your instructions.
:) ….. thanks for your comment !
For the question 1 : we don’t have a specific code to copy the style of a button to another ! But you can just create a hidden button named button sample then in the code you say me.button2.backcolor = buttonSample.backcolor etc…
For the question 2 , : are talking about how to secure your database copy , or secure a button ?
Another video link :
Ms Access Dynamic Menu 2 TH-cam Msaccess Menu 2
th-cam.com/video/2zHQJmzMycA/w-d-xo.html
Side Menu 3 Ms Access Adavanced Login Form and User's Menu Controle
th-cam.com/video/aMVKySVYBrw/w-d-xo.html
Side Menu 4 sqlserver connection ,DataMacro Stop Using link Table , custom message box ,Advanced For
th-cam.com/video/wWhHnbsQhQQ/w-d-xo.html
@@sissokom.prodev9979 thank you so much... This is exactly what I was looking for... Thank you again
Votre application est en français mais vous parlez en anglais Mr. Sissoko
Je regarde juste mais vos explications sont en anglais 💔
Hi. The SetBt() function you created, does not work for me under access 2007. Yet despite copying the code exactly as in the video and as stated in the description, it keeps returning the error " Property or method not supported by the object". Please can you help me. Thank you.
Hi ! Some properties has been created in office 2013… the database sample we provide is created from office 2016
Do you have any idea why this code does not change my backcolor? I am following your steps, same box name, same button name, same design, code etc. There is no error message, tried on Office 365, office 2016, office 2019 the result is same, color is not changing.
I experience the same thing but I manage to find out how it happen. Try to change the color of the button from what he did. I think you made it transparent.
Nice video. Is there a way to reach you? I would like an advice on a project
on ms access master group on facebook facebook.com/groups/345768833121934
hi, Where did you get those icon pictures on the button menu please
Iconarchive.com
@@sissokom.prodev9979 Thanks sir, but do you know why when i insert the picture on my button, it looks very small and not big like yours
I get error Asset Master List cannot find the object 'SetBt()" when trying to following your video, please help
You need to Dim i As Integer a line after you call the function
Hai, Sir.....
Can we get an example of the MS Access this file ?
Thanks.
The file is available in ms access master group in Facebook
facebook.com/groups/345768833121934/permalink/620222279009920/
You need to join the group before being able to download
Nice dashboard! Can you share the file with us?
The file is on the Facebook group : MS Access master : you need to be accepted on the group in order to download the file
facebook.com/groups/345768833121934/permalink/620222279009920/?mibextid=wACSiI&fs=e&s=cl
@@sissokom.prodev9979 I am already member of that group. I have few post on MS-ACCESS on this group.
@@harun24hr so go to the group files and find sidemenu DB 7 , that will ne is the last version published
I know so many tips for it...
Tips about Ms Access ?
I tried to add more buttons but after menu 9 it gives me an error. why?
Go to ms access Master group and download the last version of sidemenudb7 .. to download the file you need to be accepted in the group
Pin that menu already!
friend i saw your video 100 times - every time i apply what you have said but the result still error
Go to ms access Master group on Facebook to post your error screenshot ! You will be guided
facebook.com/100015557976530/videos/137307092721802/?mibextid=v7YzmG
works without the tabs for me. but when i add the tabs i get "object doesn't support this property or method" Here is the code i used
Private Function SetBt()
Dim Ax As Single
Ax = CSng(Right(Me.ActiveControl.Name, 1))
For i = 1 To 4
Me("B" & i).BackColor = Box0.BackColor
Next
Me.ActiveControl.BackColor = Box1.BackColor
Me("P" & Ax).SetFocus
LB0.Caption = Me("B" & Ax).Caption
End Function
got it working. How do I add data from other tables in the tabs and sub tabs?
how did you solved this issue bro?