I am currently in the process of trying to customise a Calendar Template (link below).
The workbook has two sheets:
Sheet 1 - Calendar (Front End)
Sheet 2 - Schedule
On Sheet 1 there is an Add Event button which allows users to enter in a Date and Event Name which is then added as a new row to a table on Sheet 2. What I am trying to do is to add the ability to do recurring entries such as Fortnightly and Monthly.
Current Add Button Code
Sub AddEvent() Lrow = Worksheets("Schedule").Range("B" & Rows.Count).End(xlUp).Row + 1 Worksheets("Schedule").Range("B" & Lrow) = ActiveSheet.Range("N6") Worksheets("Schedule").Range("C" & Lrow) = ActiveSheet.Range("M6") ActiveSheet.Range("M6:N6") = "" SortTable End Sub
I found the below thread on this forum which has the same concept that I want but I am unable to get it to work properly. Is there anyone who might know if this is possible and if so what code I would use?
Calendar Template - https://www.get-digital-help.com/calendar-monthly-view/
Thanks in advance,