Creating calendar with month and date change on button click

M

mrMini

New Member
Joined
May 6, 2020
Messages
3
Office Version
  1. 2013
Platform
  1. Windows
So I am trying to create a sort of month view:
Skjermbilde 2020-05-06 kl. 10.19.11.png

I have manually typed in the dates, and working hours each day. I have also added a button on the right side. How can I change month by using the button, and automatically change the dates so I can fill inn working hours for the next month?
 

Excel Facts

Test for Multiple Conditions in IF?
Use AND(test, test, test, test) or OR(test, test, test, ...) as the logical_test argument of IF.
Sort by date Sort by votes
Hi, why limit to months, why not generate a whole year at once?

And propably some clever array formula is possible too.
Book1
ABCDEFGHIJKLM
1
22020JanFebMarAprMayJunJulAugSepOctNovDec
317,5  7,57,57,57,5 7,57,5 7,5
427,5 7,57,5 7,57,5 7,57,57,57,5
537,57,57,57,5 7,57,57,57,5 7,57,5
64 7,57,5 7,57,5 7,57,5 7,57,5
75 7,57,5 7,57,5 7,5 7,57,5 
867,57,57,57,57,5 7,57,5 7,57,5 
977,57,5 7,57,5 7,57,57,57,5 7,5
1087,5  7,57,57,57,5 7,57,5 7,5
1197,5 7,57,5 7,57,5 7,57,57,57,5
12107,57,57,57,5 7,57,57,57,5 7,57,5
1311 7,57,5 7,57,5 7,57,5 7,57,5
1412 7,57,5 7,57,5 7,5 7,57,5 
15137,57,57,57,57,5 7,57,5 7,57,5 
16147,57,5 7,57,5 7,57,57,57,5 7,5
17157,5  7,57,57,57,5 7,57,5 7,5
18167,5 7,57,5 7,57,5 7,57,57,57,5
19177,57,57,57,5 7,57,57,57,5 7,57,5
2018 7,57,5 7,57,5 7,57,5 7,57,5
2119 7,57,5 7,57,5 7,5 7,57,5 
22207,57,57,57,57,5 7,57,5 7,57,5 
23217,57,5 7,57,5 7,57,57,57,5 7,5
24227,5  7,57,57,57,5 7,57,5 7,5
25237,5 7,57,5 7,57,5 7,57,57,57,5
26247,57,57,57,5 7,57,57,57,5 7,57,5
2725 7,57,5 7,57,5 7,57,5 7,57,5
2826 7,57,5 7,57,5 7,5 7,57,5 
29277,57,57,57,57,5 7,57,5 7,57,5 
30287,57,5 7,57,5 7,57,57,57,5 7,5
31297,5  7,57,57,57,5 7,57,5 7,5
32307,5 7,57,5 7,57,5 7,57,57,57,5
33317,5 7,5   7,57,5   7,5
Sheet1
Cell Formulas
RangeFormula
B3:M33B3=(DAY(DATE($A$2,COLUMN()-1,$A3))=$A3)*(WEEKDAY(DATE($A$2,COLUMN()-1,$A3),2)<6)*7.5

Spinner Controls
1588767873058.png
 
Upvote 0
GraH said:
Hi, why limit to months, why not generate a whole year at once?

And propably some clever array formula is possible too.
Book1
ABCDEFGHIJKLM
1
22020JanFebMarAprMayJunJulAugSepOctNovDec
317,5  7,57,57,57,5 7,57,5 7,5
427,5 7,57,5 7,57,5 7,57,57,57,5
537,57,57,57,5 7,57,57,57,5 7,57,5
64 7,57,5 7,57,5 7,57,5 7,57,5
75 7,57,5 7,57,5 7,5 7,57,5 
867,57,57,57,57,5 7,57,5 7,57,5 
977,57,5 7,57,5 7,57,57,57,5 7,5
1087,5  7,57,57,57,5 7,57,5 7,5
1197,5 7,57,5 7,57,5 7,57,57,57,5
12107,57,57,57,5 7,57,57,57,5 7,57,5
1311 7,57,5 7,57,5 7,57,5 7,57,5
1412 7,57,5 7,57,5 7,5 7,57,5 
15137,57,57,57,57,5 7,57,5 7,57,5 
16147,57,5 7,57,5 7,57,57,57,5 7,5
17157,5  7,57,57,57,5 7,57,5 7,5
18167,5 7,57,5 7,57,5 7,57,57,57,5
19177,57,57,57,5 7,57,57,57,5 7,57,5
2018 7,57,5 7,57,5 7,57,5 7,57,5
2119 7,57,5 7,57,5 7,5 7,57,5 
22207,57,57,57,57,5 7,57,5 7,57,5 
23217,57,5 7,57,5 7,57,57,57,5 7,5
24227,5  7,57,57,57,5 7,57,5 7,5
25237,5 7,57,5 7,57,5 7,57,57,57,5
26247,57,57,57,5 7,57,57,57,5 7,57,5
2725 7,57,5 7,57,5 7,57,5 7,57,5
2826 7,57,5 7,57,5 7,5 7,57,5 
29277,57,57,57,57,5 7,57,5 7,57,5 
30287,57,5 7,57,5 7,57,57,57,5 7,5
31297,5  7,57,57,57,5 7,57,5 7,5
32307,5 7,57,5 7,57,5 7,57,57,57,5
33317,5 7,5   7,57,5   7,5
Sheet1
Cell Formulas
RangeFormula
B3:M33B3=(DAY(DATE($A$2,COLUMN()-1,$A3))=$A3)*(WEEKDAY(DATE($A$2,COLUMN()-1,$A3),2)<6)*7.5

Spinner Controls
View attachment 13199
Click to expand...
Cool! But why do I get error when using the cell function?
Skjermbilde 2020-05-06 kl. 15.15.16.png
 
Upvote 0
Cell function? I have not used that function.
Could it be you need to use ";" as argument separator in stead of ","?
 
Upvote 0
You must log in or register to reply here.

Similar threads

W
  • Question Question
Date Planner from Start and End Dates
2
Replies
11
Views
124
Cubist
Cubist
R
  • Question Question
VBA click counter
Replies
4
Views
120
myall_blues
myall_blues
S
  • Solved
When Filter is applied, Excel jumps down multiple rows to (Blanks). How can Filter ignore blanks?
Replies
3
Views
453
Peter_SSs
Peter_SSs
F
  • Solved
PivotTable Fields and VBA
Replies
3
Views
233
Domenic
D
S
  • Solved
Display date using ordinal numbering
2
Replies
10
Views
356
6StringJazzer
6StringJazzer

Forum statistics

Threads
1,224,817
Messages
6,181,149
Members
453,021
Latest member
Justyna P

Share this page

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top