How to add more Categories and add Category details in a cell

[kooldude1305]

Hi All,
I am new to access. I was modifying one of Peter Hibbs calendar, and I want to add more than 10 Categories, and show the Category details on the Calendar along with Time slot, Employee name, and subject. I attached the DB for reference.



Thanks for looking into it.
Cheers

[June7]

Those categories are just command buttons. Add as many as you want and modify code as appropriate. Will have to resize and/or move things around to make more buttons fit. I probably would have designed with a combobox or listbox instead of buttons for categories.

Ooops, I just looked at the Daily calendar. This shows categories as columns. Now I see why developer limited to 10 categories. Expanding may not be practical with this app. How many more?

To include category info for weekly calendar, I modified one line of code in ShowWeekAppts procedure:

            vString = RichTextCode(vSubject & "; Cat " & rst!CategoryID & String(45, " "), rst!CatColor, vbBlack, False, False)     'format text with back color

added: & "; Cat " & rst!CategoryID

[kooldude1305]

Hi,
Thanks for the reply.
I am looking to expand 10 more categories, so totally 20 categories.
Thanks

[June7]

Would be tricky to display 20 categories on Daily calendar. Probably have to 'wrap' the category fields and display on two lines. Arrange first 10 textboxes on a line above second 10 textboxes and the same for label headers at top. Will make form twice as long.

tblWeekData will have to be modified to add 10 fields.