I don't think I am understanding how VBA handles the passing of objects
and stuff when a button is pressed.

Basically, I have a calender control with the name calendar1 and when I
press the command button I want to put the date into a cell. So the
code I have so far:


Code:
--------------------

Private Sub CommandButton1_Click(Calendar1 As Object)
Range("A1") = Calendar1.Value

End Sub

--------------------


But I get the Compile error:

Procedure declaration does not match description of event or procedure
having the same name.

Can someone explain how VBA handles the sending of objects into subs?


--
FCC
------------------------------------------------------------------------
FCC's Profile: http://www.excelforum.com/member.php...o&userid=35888
View this thread: http://www.excelforum.com/showthread...hreadid=557644

FCC

I would not use a button at all. If the calendar control is on the
worksheet, paste code like this into the calendar control click event (right
click on the calendar and select view code)

Private Sub Calendar1_Click()
Me.Range("A1").Value = Calendar1.Value
End Sub

It places the date selected in the calendar in A1 of the sheet each time it
is clicked

--
HTH
Nick Hodge
Microsoft MVP - Excel
Southampton, England
www.nickhodge.co.uk
HIS


"FCC" wrote in message
...

I don't think I am understanding how VBA handles the passing of objects
and stuff when a button is pressed.

Basically, I have a calender control with the name calendar1 and when I
press the command button I want to put the date into a cell. So the
code I have so far:


Code:
--------------------

Private Sub CommandButton1_Click(Calendar1 As Object)
Range("A1") = Calendar1.Value

End Sub

--------------------


But I get the Compile error:

Procedure declaration does not match description of event or procedure
having the same name.

Can someone explain how VBA handles the sending of objects into subs?


--
FCC
------------------------------------------------------------------------
FCC's Profile:
http://www.excelforum.com/member.php...o&userid=35888
View this thread: http://www.excelforum.com/showthread...hreadid=557644

Well actually, the calender is part of a user form which the user uses
to enter an employee's name and their employment date.

Which is why I would like a command button to handle both the username
and the employment date at the same time.


--
FCC
------------------------------------------------------------------------
FCC's Profile: http://www.excelforum.com/member.php...o&userid=35888
View this thread: http://www.excelforum.com/showthread...hreadid=557644

In which case the button should hide the userform and then you can place the
data in the worksheet and unload the form from memory (Me refers to the
container...form, that contains the control)

Private Sub CommandButton1_Click()
Me.Hide
Worksheets("Sheet1").Range("A1").Value = Calendar1.Value
Unload Me
End Sub

--
HTH
Nick Hodge
Microsoft MVP - Excel
Southampton, England
www.nickhodge.co.uk
HIS


"FCC" wrote in message
...

Well actually, the calender is part of a user form which the user uses
to enter an employee's name and their employment date.

Which is why I would like a command button to handle both the username
and the employment date at the same time.


--
FCC
------------------------------------------------------------------------
FCC's Profile:
http://www.excelforum.com/member.php...o&userid=35888
View this thread: http://www.excelforum.com/showthread...hreadid=557644