Ms Access Dynamic Menu

Sdílet
Vložit
  • čas přidán 19. 08. 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
  • Věda a technologie

Komentáře • 67

  • @TLDW_Tutorials
    @TLDW_Tutorials Před měsícem +2

    As a fellow CZcamsr and Access developer myself, I just wanted to say this is a beautiful layout and interface. Well done!

  • @freebird7556
    @freebird7556 Před 2 lety

    Thank you for sharing.. looks very good!!!!

  • @sephjvr5979
    @sephjvr5979 Před 2 lety

    Great Video! Thank you.

  • @beinteractivebrits4540
    @beinteractivebrits4540 Před 2 lety +2

    You are such an artist! Excellent menu systems you have! I cannot find part 3 for the Dynamic Menus.

    • @sissokom.prodev9979
      @sissokom.prodev9979  Před 2 lety +2

      Side Menu 3 Ms Access Adavanced Login Form and User's Menu Controle
      czcams.com/video/aMVKySVYBrw/video.html

  • @haroldcruzcorrea
    @haroldcruzcorrea Před rokem +2

    Excelente explicación así como el contenido 🙂

  • @paulajimenez8964
    @paulajimenez8964 Před rokem

    Great video!!! Thank you!!!!!

  • @mohamadmaatouk8197
    @mohamadmaatouk8197 Před 2 lety

    its a great implementation

  • @anafofissa4776
    @anafofissa4776 Před 2 lety +2

    Hi Sir Sissoko,
    Really appreciate your work and if possible I wanna learn from you...

  • @dbdatasolutions4827
    @dbdatasolutions4827 Před 2 lety +9

    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.

    • @sissokom.prodev9979
      @sissokom.prodev9979  Před 2 lety +1

      Thanks !

    • @simonmaersk
      @simonmaersk Před rokem +2

      No no no don't add multiple subforms. Just add one subform control and change the record source in the VBA code

  • @niktsol
    @niktsol Před 2 lety +2

    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.!!

    • @sissokom.prodev9979
      @sissokom.prodev9979  Před 2 lety +2

      i think that is simple to implament... you can the same function under the menu button , to list on click,....

  • @borgehansen6680
    @borgehansen6680 Před 4 měsíci

    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.

  • @mehdihamedi123
    @mehdihamedi123 Před rokem +1

    This is great 😍😍😍😍😍😍😍😍

  • @JeserCotrim
    @JeserCotrim Před rokem

    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?

  • @AlAmin-pr2gp
    @AlAmin-pr2gp Před 2 lety

    Thank your

  • @good-sharing
    @good-sharing Před rokem

    Why my Access 365 is not the same as yours after I clicked at Create (a blank database)?

  • @cdscoys4775
    @cdscoys4775 Před 2 lety +2

    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

    • @sissokom.prodev9979
      @sissokom.prodev9979  Před 2 lety

      You , mean add more tab on left , or right, side ?

    • @cdscoys4775
      @cdscoys4775 Před 2 lety

      @@sissokom.prodev9979 yes, in your video you added 2 more tabs to the right but didn't really explain how to link them

    • @sissokom.prodev9979
      @sissokom.prodev9979  Před 2 lety +1

      You can check the next video ! You need to see all the video of side menu DB , to understand well

  • @alixstlouis3133
    @alixstlouis3133 Před 7 měsíci

    I would like to be able to view all the menus as well as the entire database in sequential tutorials.

  • @jameskojopaintsil9623
    @jameskojopaintsil9623 Před měsícem

    Hi Sir, thank you for the insight, please how can I link the buttons to their respective forms and queries

  • @KentReynolds
    @KentReynolds Před 7 měsíci

    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!

  • @kemalayaz6459
    @kemalayaz6459 Před 8 měsíci

    Wonderfull

  • @marwak399
    @marwak399 Před 2 lety

    Hi thank you great tutorial! just a question how to use the side button to navigate between the pages? without using the label part

    • @sissokom.prodev9979
      @sissokom.prodev9979  Před 2 lety

      I don’t understand your question !! Since the code : pagename.setfocus can show any page … so ….

    • @marwak399
      @marwak399 Před 2 lety

      @@sissokom.prodev9979 Ops i missed this part! thank you

  • @bobykumar3960
    @bobykumar3960 Před rokem +1

    good job

  • @s.sloppy1999
    @s.sloppy1999 Před rokem

    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.

    • @constructioncost
      @constructioncost Před rokem

      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.

  • @maxcanispugnax4082
    @maxcanispugnax4082 Před 7 měsíci

    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.

    • @sissokom.prodev9979
      @sissokom.prodev9979  Před 7 měsíci +1

      Hi ! Some properties has been created in office 2013… the database sample we provide is created from office 2016

  • @noone6476
    @noone6476 Před rokem

    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.

    • @sissokom.prodev9979
      @sissokom.prodev9979  Před rokem

      :) ….. 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 CZcams Msaccess Menu 2
      czcams.com/video/2zHQJmzMycA/video.html
      Side Menu 3 Ms Access Adavanced Login Form and User's Menu Controle
      czcams.com/video/aMVKySVYBrw/video.html
      Side Menu 4 sqlserver connection ,DataMacro Stop Using link Table , custom message box ,Advanced For
      czcams.com/video/wWhHnbsQhQQ/video.html

    • @noone6476
      @noone6476 Před rokem

      @@sissokom.prodev9979 thank you so much... This is exactly what I was looking for... Thank you again

  • @44louix
    @44louix Před rokem

    hi, Where did you get those icon pictures on the button menu please

    • @sissokom.prodev9979
      @sissokom.prodev9979  Před rokem +1

      Iconarchive.com

    • @44louix
      @44louix Před rokem

      @@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

  • @rickylam7862
    @rickylam7862 Před 2 lety

    I get error Asset Master List cannot find the object 'SetBt()" when trying to following your video, please help

    • @artgb_
      @artgb_ Před rokem

      You need to Dim i As Integer a line after you call the function

  • @alfredallen6113
    @alfredallen6113 Před 4 měsíci

    Nice video. Is there a way to reach you? I would like an advice on a project

    • @sissokom.prodev9979
      @sissokom.prodev9979  Před 3 měsíci

      on ms access master group on facebook facebook.com/groups/345768833121934

  • @tuamaleos4519
    @tuamaleos4519 Před 2 lety

    Hai, Sir.....
    Can we get an example of the MS Access this file ?
    Thanks.

    • @sissokom.prodev9979
      @sissokom.prodev9979  Před 2 lety +1

      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

  • @akhileshyadav7366
    @akhileshyadav7366 Před 7 měsíci

    I know so many tips for it...

  • @alfredomorello1763
    @alfredomorello1763 Před rokem

    I tried to add more buttons but after menu 9 it gives me an error. why?

    • @sissokom.prodev9979
      @sissokom.prodev9979  Před rokem

      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

  • @voldyilunga3391
    @voldyilunga3391 Před 2 lety +1

    Votre application est en français mais vous parlez en anglais Mr. Sissoko
    Je regarde juste mais vos explications sont en anglais 💔

  • @JB.99999
    @JB.99999 Před 2 lety

    Pin that menu already!

  • @harun24hr
    @harun24hr Před 2 lety

    Nice dashboard! Can you share the file with us?

    • @sissokom.prodev9979
      @sissokom.prodev9979  Před 2 lety

      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

    • @harun24hr
      @harun24hr Před 2 lety

      @@sissokom.prodev9979 I am already member of that group. I have few post on MS-ACCESS on this group.

    • @sissokom.prodev9979
      @sissokom.prodev9979  Před 2 lety +1

      @@harun24hr so go to the group files and find sidemenu DB 7 , that will ne is the last version published

  • @user-cx1mc6fm3n
    @user-cx1mc6fm3n Před 10 měsíci

    friend i saw your video 100 times - every time i apply what you have said but the result still error

    • @sissokom.prodev9979
      @sissokom.prodev9979  Před 10 měsíci

      Go to ms access Master group on Facebook to post your error screenshot ! You will be guided
      facebook.com/100015557976530/videos/137307092721802/?mibextid=v7YzmG

  • @daviddesideri5748
    @daviddesideri5748 Před 3 měsíci

    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?

  • @Puti3164
    @Puti3164 Před 21 dnem

    terimakasih my friend
    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
    🙏

  • @henryjayr
    @henryjayr Před rokem

    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

    • @henryjayr
      @henryjayr Před rokem

      got it working. How do I add data from other tables in the tabs and sub tabs?

    • @izeckelibrah916
      @izeckelibrah916 Před rokem

      how did you solved this issue bro?