Uses for Excel

  Graham ® 09:56 21 May 06
Locked

Someone asked recently what use was Excel. I can't find the thread, but my main use is to keep a record of Direct Debits. I have 11 of these at the moment, fuel, telephone, TV license etc.

I find it handy to freeze the panes and tick them off (I use a Y) when my bank statement arrives.

I don't need to manipulate the data, but Excel gives an easy to read format - you can use different colours if you wish.

  VoG II 10:08 21 May 06

I recently discovered how to use this little calendar control thingy click here

Here's an example screenshot click here

And here's the code that goes with it

Private Sub Calendar1_Click()
Dim MyDate As Date, Found As Range
MyDate = Calendar1.Value
Set Found = Sheets("Main").Columns(2).Find(MyDate)
If Found Is Nothing Then
Beep
Exit Sub
End If
Range(Found.Offset(0, -1), Found.Offset(0, 4)).Select
End Sub

Private Sub cmdClose_Click()
Unload Me
End Sub

Private Sub UserForm_Activate()
With Me
.Left = Application.Width - .Width
.Top = 0
End With
End Sub

  Graham ® 10:16 21 May 06

I'll download the program, thanks. Dunno about the code :-)

  Graham ® 10:24 21 May 06

OK, followed the instructions up to Registering the Control. So I have to tackle the code now? Step by step, please.

  VoG II 10:39 21 May 06

Step by step, an excellent tutorial click here

  Graham ® 11:01 21 May 06

I've had my sausage sandwich, it's raining and both cats are asleep, so I'll have a go.

  Graham ® 11:33 21 May 06

The Toolbox is greyed out.

  VoG II 11:46 21 May 06

Do you mean on the View menu?

  Graham ® 11:50 21 May 06

Yes.

  VoG II 11:54 21 May 06

OK, you need to insert a Userform first. Insert > Userform. View > Toolbox should now be available.

  Graham ® 12:02 21 May 06

Got it!

One other thing,
'Make the following changes in the Properties Window...'

Name: frmCalendar

Caption: Select a Date

I've changed the name, but there's no heading for Caption.

This thread is now locked and can not be replied to.

How to get Windows 10 for free | How to install Windows 10: There is still a way to avoid paying…

1995-2015: How technology has changed the world in 20 years

Alex Chinneck’s giant ice cube Christmas tree at Kings Cross

Apple rumours & predictions 2017: The iPhone 8, new iPads, and everything else you should expect fr7…