How to Create Calendar Part 1?

แชร์
ฝัง
  • เผยแพร่เมื่อ 20 มิ.ย. 2024
  • In this step-by-step, How to Create Calendar Part 1, #TUTORIAL video, you will learn how to create a custom calendar in MS Access from start to finish. You will learn to iterate through controls and find out about their properties. You will also learn to update the control values.
    If you find this video beneficial, you are encouraged to make a small donation at bit.ly/3ysfPoX . Any amount is always appreciated.
    Thank you for watching this #CALENDAR #MSACCESS and enjoy the video.
  • แนวปฏิบัติและการใช้ชีวิต

ความคิดเห็น • 73

  • @kevinmarcus465
    @kevinmarcus465 หลายเดือนก่อน +1

    Beginner here and I liked and subscribed and I believe its important to support those that are creating these videos and share there knowledge on there own time! Thank you for sharing and creating these videos I hope to learn a lot and not spend endless amounts of money in school when I believe SME like your self are just as qualified to teach the same subject. I hope you earn revenue on this channel.

    • @MicrosoftAccessHowTos
      @MicrosoftAccessHowTos  หลายเดือนก่อน +1

      Thank you for you kind words and support. I do have lots of videos on how to write applications using MS ACCESS - even for use with large companies.
      I do wish there were more interactions and questions; so I can help.
      Again, thank you for following. 🥰

    • @kevinmarcus465
      @kevinmarcus465 หลายเดือนก่อน +1

      @@MicrosoftAccessHowTos I sometimes wonder if it would be easier to just hire someone to develop what I need then me trying to do ot myself. I also wonder when designed how can I use this in power apps to turn it into an app?

    • @MicrosoftAccessHowTos
      @MicrosoftAccessHowTos  หลายเดือนก่อน

      @@kevinmarcus465 It all depends on your focus. If you want to code the application the way you want, then you will have to do it yourself. It will save you money. If spending money is not the problem, then you might want to hire someone to do it for you.
      Honestly, I have never used power apps. So I cannot tell you how to transition from desktop to power app. That said, I develop MS ACCESS applications for our employees who live in different parts of the US. They access these applications through RDWeb ACCESS - e.g. Remote Web Access.
      Good question though!👍

  • @cardin94
    @cardin94 ปีที่แล้ว +4

    This is probably the best instruction video i have seen for access. Thank you for also showing the way you think through the programming. it helps a lot to see the way you structure your thoughts while programming.

    • @MicrosoftAccessHowTos
      @MicrosoftAccessHowTos  ปีที่แล้ว

      Glad it helps and thank you for watching.
      After you have watched this video with all the controls and code, watch how I streamline the display code here: th-cam.com/video/c9Cf5-yIzsc/w-d-xo.html

  • @TheRealKaiProton
    @TheRealKaiProton 2 ปีที่แล้ว +3

    this was great, Ive been using Access for years, and using it to prototype a calendar DBase, the rate you work, and explain, not only was I happy to find out new ways to do stuff, Im thinking I will just use Access once Ive got to the end of the videos.

    • @MicrosoftAccessHowTos
      @MicrosoftAccessHowTos  2 ปีที่แล้ว

      I am glad you find it helpful. I updated the code for displaying the date. After watching this video, watch this one beginning 7:50 th-cam.com/video/jYIxzCJ1fAM/w-d-xo.html
      You will be pleased. Thanks for watching.

  • @rraveen1609
    @rraveen1609 2 หลายเดือนก่อน +2

    it is great watch your videos. Is it possible to combine all the month with data into a single year display. I mean all 12 months in one page

    • @MicrosoftAccessHowTos
      @MicrosoftAccessHowTos  2 หลายเดือนก่อน

      Yes. But that would mean the text on the screen will be very small or you can make it a scrollable.

  • @tigerlilly6895
    @tigerlilly6895 2 ปีที่แล้ว +2

    Thank you... I agree, I've been building DB's since the late 90's... it is actually very good for the brain and helps you with problem solving on all levels.
    However for your Month table I'd source another field for the number (using it as a Month Index) and call it IndMonth and the month field txtMonth so that if you do accidentally delete a record you can read and just re-add that month with the correct index number and resource the cboMonth column count to 3, go into source and add the month table, add the 3 fields with auto number first, indMonth 2nd ascending, txtMonth in the last qry grid... Then close and adjust your property to 0";0";1" / width = 1", and use the auto id for the rest :)

    • @MicrosoftAccessHowTos
      @MicrosoftAccessHowTos  2 ปีที่แล้ว

      Thanks for suggestion.
      We all can come up with ways to do things - and differently. However, I like things to be simple and work well.
      With that said, the MonthName table has no CRUD operations for anyone to Add/Update/Delete. These records are used for the DropDown list only.
      Besides, if I were to deploy this application to other users, I would disable all the design environment so users don't have access to the tables, queries, class modules, and modules, etc...

    • @tigerlilly6895
      @tigerlilly6895 2 ปีที่แล้ว +1

      @@MicrosoftAccessHowTos I get it... I just like to be a bit protective about things people can accidently do like delete a record... :)

  • @sisoader7391
    @sisoader7391 2 ปีที่แล้ว +1

    HELLO. THANK YOU SO MUCH FOR THIS COURSE. REALLY VERY INTERESTING.

    • @MicrosoftAccessHowTos
      @MicrosoftAccessHowTos  2 ปีที่แล้ว

      Thank you. I have part 3 coming up. I show how one can display information on the calendar.

  • @Mo91119
    @Mo91119 หลายเดือนก่อน +1

    Fantastic tutorial (I'm a beginner). I have worked through both video's and managed to create the calendar and it works perfectly provided I changed my system date to dd.mm.yyyy. Is there a way to select a date format picker so that users in different countries, interacting on the same calendar don't have to change the system date?

    • @MicrosoftAccessHowTos
      @MicrosoftAccessHowTos  หลายเดือนก่อน +1

      This is a great question. If you assign a date in the DisplayCalendar sub routine using DateSerial function, it will display the dates correctly per region - e.g. country. That way the application can be used in any region.
      Check out this video at 12:00 minutes. I explain it here: th-cam.com/video/4j2_iBK7p6s/w-d-xo.html

  • @999juanrivera1
    @999juanrivera1 ปีที่แล้ว +1

    Good Morning Jack. Love the Calendar you made and I am following. I have a problem and can't find what whent wrong. I am new to programing so your level is much higher than my understanding and hope to someday think ye logic like you do. OK the problem withthe calendar is it works fine 98% of the tie but on two months I get date only on Saturdays 1 through 6 (April and July). did you come across this before and do you have a fix. I am on lesson 5 and your play list goes to nine I wish to finish this project and see it to the end. Can I send you my calendar so you can check it?

    • @MicrosoftAccessHowTos
      @MicrosoftAccessHowTos  ปีที่แล้ว

      Hi and thank you for watching the playlist.
      The answer is no. I have not had any issues with the calendar. And yes, go ahead and send me the video.

  • @michaelkrailo5725
    @michaelkrailo5725 2 ปีที่แล้ว

    So if not using a hidden control and using variable, the variable could disappear or become Null? I've never heard of that before. How about a TempVar? Anyways great walk though of how you refactor your code as you go along to make it as nice as you can instead of just going with what works at the time and ending up with a mess.

  • @michaelkrailo5725
    @michaelkrailo5725 2 ปีที่แล้ว +2

    Another way to do this would be to put that MID function into the IsValidateDay function.
    Private Function IsValidDay(ControlName As String) As Boolean
    Select Case Mid(ControlName, 4, 3)
    Case "sun", "mon", "tue", "wed", "thu", "fri", "sat": IsValidDay = True
    Case Else: IsValidDay = False
    End Select
    End Function

    • @TheRealKaiProton
      @TheRealKaiProton 2 ปีที่แล้ว +1

      Yes, I used Case for that too, I always try to use case statements if there are multiple If or's

  • @markdesens9326
    @markdesens9326 2 ปีที่แล้ว +2

    Hi Jack I’m Mark. I’m making a database for my nonprofit organization. My Organization is called Love Lines Crisis Center, we are a suicide hotline. I started learning Access this year and doing pretty good. I need to make a calendar for it now to add our volunteers names and the time they are on shift on this calendar now. I watched this video and half of part 2. I did the code to number the days 1 - 31 accordingly. The only problem is now, I tried to follow it exactly but when I go to the next month or previous month it inserts randomly the first of the month or the first and second of the month twice. It does the fourth day on nicely.
    Second, on each day how can I put our volunteers names, position and hourly shift on. Would a pop up window for each day work or a form inside this calendar form?

    • @markdesens9326
      @markdesens9326 2 ปีที่แล้ว +1

      Hi, it’s Mark. I figured out the problem that I described to you. Thanks.

    • @MicrosoftAccessHowTos
      @MicrosoftAccessHowTos  2 ปีที่แล้ว

      Excellent. Watch modules 21 and 22, you will have ideas how to display anything on the calendar. Also, if you have more info to display, use the popup form for the button click - hints the date button.

  • @user-ey8yr3zc1o
    @user-ey8yr3zc1o ปีที่แล้ว

    Hi Jack, I am loving this tutorial so far!
    I have a question about the step on 30:35. I am trying to get the code to work, but when I run it it says "runtime error" and that I can't assign a value to the object. When I debug, it highlights the line "Me.txtSelectDate = Date". Do you know how I should fix this?

    • @MicrosoftAccessHowTos
      @MicrosoftAccessHowTos  ปีที่แล้ว

      When the debug stops at a line, it means that something is not right for that line. In this case, it looks like:
      1. The Me.txtSelectDate is mis-typed. Make sure the Me.txtSelectDate control is assigned to "Short Date" on the form.
      2. Make sure the Me.txtSelectDate is enabled on the property sheet.
      If you are still having issues with this, just email me the application. I will debug it for you.
      Cheers!

    • @user-ey8yr3zc1o
      @user-ey8yr3zc1o ปีที่แล้ว

      @@MicrosoftAccessHowTos Thank you so much! I am still having some trouble, what is your email?

    • @MicrosoftAccessHowTos
      @MicrosoftAccessHowTos  ปีที่แล้ว

      @@user-ey8yr3zc1o Go go my channel and click on about tab.

    • @MicrosoftAccessHowTos
      @MicrosoftAccessHowTos  ปีที่แล้ว

      So, I looked at your application and the reason why you get an error is because the text box is bound to a variable - e.g. p, u n
      On the calendar form, the text boxes should not be bounded to anything. To fix your problem is to remove anything from the control source.

  • @andrewblanchard4909
    @andrewblanchard4909 6 หลายเดือนก่อน +1

    Firstly let me commend on the Create Calendar tutorial. it has been of great assistance.
    I am creating an application for a Spa and the Region is Thailand where dates will be entered as dd/mm/yyyy. I note in your tutorial that your Region is America or a region where dates are entered as mm/dd/yyyy.
    If I leave my region as Thailand the dates on the calendar do not populate correctly. If I change my computer region to America everything is fine but I wish to use the region setting as Thailand given this is the region in which the operators reside and they are familiar with the date formatting.
    Is there a way to format the date so that it is entered and viewed in the dd/mm/yyyy format but read as mm/dd/yyyy so that the days are correctly numbered within the calendar.

    • @MicrosoftAccessHowTos
      @MicrosoftAccessHowTos  6 หลายเดือนก่อน

      This is a great question. Send me your application and I will try to solve the issue. Plus, I can share the findings/resolution to others.
      Go to my channel, click on About button and send the application to that email.

    • @andrewblanchard4909
      @andrewblanchard4909 6 หลายเดือนก่อน +1

      I have since worked it out by formatting the first date statement after reviewing comments from others.
      FirstDay = Format(DateSerial(Year(Me.txtSelectDate), Month(Me.txtSelectDate), 1), "ddd")
      I have already sent the application to you but since then have progressed.

    • @MicrosoftAccessHowTos
      @MicrosoftAccessHowTos  6 หลายเดือนก่อน +1

      Great. Since this video, I have used DateSerial to format the date for the rest of my videos - knowing many people from countries other than USA watch my videos.
      I am glad you've solved the issue. Be sure to watch the Multilingual Module if you want to change it to read in Thai.
      By the way, I just got back from Thailand - spent a month in Thailand and Laos. Great country.

  • @yeohan247
    @yeohan247 ปีที่แล้ว +1

    Sir...can i request the finish product of you calendar...the access file of it.

  • @shobha.g.sshankarappa2942
    @shobha.g.sshankarappa2942 2 ปีที่แล้ว

    Hi thank you so much for your informative video, please make a video on how calculate no of days between two dates excluding Sundays and Holidays in MS Access, I can do it in Excel but not in Access... please .. I am searching since many years I didn't find it.. please help me.

    • @MicrosoftAccessHowTos
      @MicrosoftAccessHowTos  2 ปีที่แล้ว +2

      Private Function GetNumberOfDay(fromDate As Date, toDate As Date) As Integer
      Dim numberHoliday As Integer
      Dim dayDifference As Integer
      Dim fromDay As Integer
      Dim ctr As Integer
      Dim selectDate As Date
      dayDifference = DateDiff("d", fromDate, toDate)
      fromDay = Format(fromDate, "dd")
      For ctr = 1 To dayDifference + 1
      selectDate = CDate(Month(fromDate) & "/" & fromDay & "/" & Year(fromDate))
      fromDay = fromDay + 1
      'MsgBox selectDate & " - " & Format(selectDate, "ddd")
      'look for saturday and sunday
      If Format(selectDate, "ddd") = "sun" Or Format(selectDate, "ddd") = "sat" Then
      numberHoliday = numberHoliday + 1
      End If
      Next
      'take away the weekend
      GetNumberOfDay = (dayDifference + 1) - numberHoliday
      End Function

  • @MLZKM
    @MLZKM 2 ปีที่แล้ว

    Hello! I'm trying to build a Calendar in Access, however, I am limited to only using Macro Builder for any coding done. My employer has security settings on Access that does not allow VBA writing for the entire company. I figured out how to get Macro events to work for the current, next, and previous month/year load and change, but I'm stuck on how to get the dates to show on the command buttons and change as the months/years change. I've tried several options, but trying to break it out of VBA wording into the selected macro even options starts to get confusing and loose site of where I need to start for this to work. Any assistance would be great if you are able to!

    • @MicrosoftAccessHowTos
      @MicrosoftAccessHowTos  2 ปีที่แล้ว +1

      To be honest, I am clueless when it comes to Macros. I am a vb, c# coder and database developer. I use MS Access to show how to program using objects - classes, types, interfaces, etc.
      In my opinion, it is hard to debug macros than conventional codes. Six years ago, I came to my current workplace to undo all the macros that were giving users issues. In addition, the application was overhauled to conventional coding - shown throughout my videos. Now the main application is pretty stable. Yes, we have employees throughout the States who are using the application to make quotes, add orders, send samples, add activities, and more.
      With that said, when I have time, I might look into doing a video on it.

    • @MicrosoftAccessHowTos
      @MicrosoftAccessHowTos  2 ปีที่แล้ว

      Okay, I just briefly looked into how to change command button caption using macros. I am like you - hair scratching. I don't know when the last time I opened up the macro build - lol. Sorry Buddy...

    • @MLZKM
      @MLZKM 2 ปีที่แล้ว +1

      @@MicrosoftAccessHowTos Thank you so much for your time anyways! The knowledge and time you put into your videos and actually replying or interacting with the comments is very much appreciated. I've learned quite a lot in the videos I have watched. Thank you again!

  • @collierd5820
    @collierd5820 7 หลายเดือนก่อน

    I am trying to run the Creating Calendar from Part 1 and 2, but it is continuously giving me an error message "Object variable on With block variable is not set" ,. Help me with this issue.

  • @juanom20000
    @juanom20000 8 หลายเดือนก่อน

    Hi, Iam stock when I try to run the first macro in "Macro Name" window

    • @MicrosoftAccessHowTos
      @MicrosoftAccessHowTos  8 หลายเดือนก่อน

      I am sorry I am clueless when it comes to macros in MS Access. I code purely through code behind files, modules, and classes only. I do not code using macros.
      If you follow the tutorial videos I uploaded, you will not hear me mentioning macros at all.
      If you have specific questions regarding my videos, I can help you with that regards. Just point me to the issue and I will debug it for you.

  • @jamesscarsce8452
    @jamesscarsce8452 ปีที่แล้ว +2

    Hi Jack! I was following your video and I encounter a situation in which I am kind of stuck at this point. I created the same form just like what you said and put the controls. It is in the label clearing part that it seems like it does not want to clear and change color. Can you tell me what I did wrong? Thank you very much for all your help and your willingness to share your fashion. ~ Jim
    Private Sub ClearCalendar()
    Rem Clear Calendar Label Control Day
    Dim ctl As Control

    For Each ctl In Controls
    If TypeName(ctl) = "Label" Then
    If IsValidDay(Mid(ctl.Name, 4, 3)) Then
    ctl.Caption = ""
    ctl.BackColor = mod_Color.AmericanRose
    End If
    End If
    Next
    End Sub
    Private Function IsValidDay(sControlName As String) As Boolean
    Rem Validate Calendar Day Labels
    If sControlName = "sun" Or sControlName = "mon" Or sControlName = "tue" _
    Or sControlName = "wed" Or sControlName = "thu" Or sControlName = "fri" _
    Or sControlName = "sat" Then IsValidDay = True
    End Function

    • @MicrosoftAccessHowTos
      @MicrosoftAccessHowTos  ปีที่แล้ว +1

      There are couple a couple of people ahead of you that I am helping.
      I will take a look at your code after those people. I will let you know.
      Thanks for watching.

    • @jamesscarsce8452
      @jamesscarsce8452 ปีที่แล้ว

      @@MicrosoftAccessHowTos Thank you very much, Jack! Please take your time. I truly appreciate your kindness and your willingness to help.

    • @MicrosoftAccessHowTos
      @MicrosoftAccessHowTos  ปีที่แล้ว +1

      I don't see any issue in the two functions above. Can you send me the db so I can debug it?

    • @jamesscarsce8452
      @jamesscarsce8452 ปีที่แล้ว

      @@MicrosoftAccessHowTos Thanks Jack I will send it to you right away! Have a great day.

    • @marcosvitorino853
      @marcosvitorino853 ปีที่แล้ว

      @@MicrosoftAccessHowTos Hi Jack, thanks for sharing this job. I have same problem of James, and i look all code and not see what i did wrong. James, sent the code for you? what is the problem? thanks in advance for your help

  • @sisoader7391
    @sisoader7391 2 ปีที่แล้ว

    PLEASE SIR, WHEN I WRITE Calendar.MonthNameByDate IT MAKES ERROR INVALID QUALIFIER WHAT'S THE PROBLEM IN THE WORD Calendar? THANK YOU SO MUCH

    • @MicrosoftAccessHowTos
      @MicrosoftAccessHowTos  2 ปีที่แล้ว

      make sure the date you pass to the function is correct

    • @sisoader7391
      @sisoader7391 2 ปีที่แล้ว +1

      @@MicrosoftAccessHowTos YOU ARE RIGHT. THE PROBLEME IS SOLVED. THANK YOU

  • @AnaRamirez-wy1nw
    @AnaRamirez-wy1nw ปีที่แล้ว

    hellooo, whenever i try to clear the labels it does not work. access highlights the "private sub ClearCalendar", everything else works but that can you help me please?

    • @AnaRamirez-wy1nw
      @AnaRamirez-wy1nw ปีที่แล้ว

      it also doesn't clear the calendar 😭😭😭😭😭

    • @MicrosoftAccessHowTos
      @MicrosoftAccessHowTos  ปีที่แล้ว +2

      @@AnaRamirez-wy1nw You can send me your application; and I will debug it for you. You can find my email in the about page.

  • @johnsonofjohn1678
    @johnsonofjohn1678 ปีที่แล้ว

    Jack,, Why can't I tab from one label to the other the way you can?

    • @MicrosoftAccessHowTos
      @MicrosoftAccessHowTos  ปีที่แล้ว

      I am not sure without looking at the code. You can either redo the code from the video or send the application to me. I can definitely debug it.

    • @johnsonofjohn1678
      @johnsonofjohn1678 ปีที่แล้ว +1

      @@MicrosoftAccessHowTos Never mind, Jack. It was just me doing it wrong. 🤪 Great video by the way! Thanks!

    • @MicrosoftAccessHowTos
      @MicrosoftAccessHowTos  ปีที่แล้ว

      @@johnsonofjohn1678 Great! Be sure to watch the Calendar playlist - especially the debugging videos. For example, I code the date based on the US date. However, that's problematic if you don't live in the US. So the date settings should be:
      DateSerial(Year, Month, Day)
      You will see as you move along the video.
      Glad you found it helpful. :)

  • @yeohan247
    @yeohan247 ปีที่แล้ว

    Sir Jack..my idol..
    Can you give a softcopy of your calendar as a medium in self study of ms access?
    Pls send it to my email...

    • @MicrosoftAccessHowTos
      @MicrosoftAccessHowTos  ปีที่แล้ว

      I am sorry. I don't have a dropbox and don't intend to have one.
      This channel is for learning how to code MS Access using MVC and object programming methodology. It would be confusing if I just give to code. In addition, it is short and anyone can make a calendar in a couple of hours. Follow part 1 and 2.
      I suggest you watch Calendar part 1 and 2. At the end, you will understand why I don't give a finished code.
      Thanks for watching!