Hi

I'm using the Calender Tool as shown in
http://www.fontstuff.com/vba/vbatut07.htm with the changes applied as shown
below by Rick Rothstein (MVP - VB).

The problem is that after using this for severeal month I now gets an error
when trying to use the function:

System Error &H8007007E (-214024770) and here after a 'Runtime error 7: Out
of memory. And once again the first error where after Excel Craches.

I VBA editor I can's show the form but code view is ok. If I try to "view
object" I get the first error above and afterwards Out of Memory.

Any help out there?
----------------------------------

RICK change
I took a quick look at the link you provided. I believe you can follow all
directions shown and you can use the MonthView control in place of the
Calendar control shown there; HOWEVER, you need to make these minor
modification in order for everything to work. First, after placing the
MonthView control on the form, rename it to Calendar1; that way, you can use
the code exactly as written. Second, the MonthView control does not have a
Click event; rather, it has a DateClick event. So, you will have to change
this procedure header used in the code from the link you provided...

Private Sub Calendar1_Click()

to this instead...

Private Sub Calendar1_DateClick(ByVal DateClicked As Date)

Making the two indicated changes above should (remember, I didn't test it)
allow you to use the rest of the code/implementation exactly as described in
the text at that link. Just so you know, the size of the MonthView control
is set by the size of the font, not by dragging the sizing handles. So, to
resize it, use the Font property from the Properties window.

Rick

I forgot to ad that if I try to add a new form in VBA editor I get the
following message: "ActiveX control 'Forms.Form' not referenced in this
project. Use Project/Components... to add a reference." Tryed the Help issue,
but can't understand what to do...

Don't know if this is to any help

"Steen" wrote:

Hi

I'm using the Calender Tool as shown in
http://www.fontstuff.com/vba/vbatut07.htm with the changes applied as shown
below by Rick Rothstein (MVP - VB).

The problem is that after using this for severeal month I now gets an error
when trying to use the function:

System Error &H8007007E (-214024770) and here after a 'Runtime error 7: Out
of memory. And once again the first error where after Excel Craches.

I VBA editor I can's show the form but code view is ok. If I try to "view
object" I get the first error above and afterwards Out of Memory.

Any help out there?
----------------------------------

RICK change
I took a quick look at the link you provided. I believe you can follow all
directions shown and you can use the MonthView control in place of the
Calendar control shown there; HOWEVER, you need to make these minor
modification in order for everything to work. First, after placing the
MonthView control on the form, rename it to Calendar1; that way, you can use
the code exactly as written. Second, the MonthView control does not have a
Click event; rather, it has a DateClick event. So, you will have to change
this procedure header used in the code from the link you provided...

Private Sub Calendar1_Click()

to this instead...

Private Sub Calendar1_DateClick(ByVal DateClicked As Date)

Making the two indicated changes above should (remember, I didn't test it)
allow you to use the rest of the code/implementation exactly as described in
the text at that link. Just so you know, the size of the MonthView control
is set by the size of the font, not by dragging the sizing handles. So, to
resize it, use the Font property from the Properties window.

Rick