Make a Floating Calendar

Bravurian17

New Member
Joined
Apr 16, 2009
Messages
34
I want to be able to keep that calendar directly under the freeze pane line when I scroll. I have used this code to do it (sort of).

Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Calendar_A.Left = Cells(1, ActiveWindow.ScrollColumn).Left + 810
Calendar_A.Top = Cells(ActiveWindow.ScrollRow, 1).Top + 10
End Sub

Is there a way to do it without having to select a cell?

Thanks in advance! :cool:

exampleeqh.jpg
 

Excel Facts

Format cells as date
Select range and press Ctrl+Shift+3 to format cells as date. (Shift 3 is the # sign which sort of looks like a small calendar).
Not sure exactly how your calendar works... but with any normal userform you could set the "showmodal" value to false

that way excel would kind of run "under" it.
 
Upvote 0

Forum statistics

Threads
1,215,219
Messages
6,123,687
Members
449,117
Latest member
Aaagu

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