Hi

I am using the calendar code from Ron de Bruin's site put in PERSONAL.XLS:
http://www.rondebruin.nl/calendar.htm

I want to call OpenCalender from Sheet2:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
If Target.Row 4 And Target.Column = 6 Then
Cancel = True
Call OpenCalendar
End If
End Sub

But I get the errormessage "The macro 'test.xls!Module1.OpenCalendar' cannot
be found"

I seems that it can't "see" the macro in PERSONAL.XLS - any solutions, what
am I doing wrong.

/Steen

Hi Steen

Not possible to use this in your personal.xls(hidden workbook)

Insert the Calendar and copy the code in the sheet module of the sheet you want in the workbook you want.

--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"Steen" wrote in message ...
Hi

I am using the calendar code from Ron de Bruin's site put in PERSONAL.XLS:
http://www.rondebruin.nl/calendar.htm

I want to call OpenCalender from Sheet2:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
If Target.Row 4 And Target.Column = 6 Then
Cancel = True
Call OpenCalendar
End If
End Sub

But I get the errormessage "The macro 'test.xls!Module1.OpenCalendar' cannot
be found"

I seems that it can't "see" the macro in PERSONAL.XLS - any solutions, what
am I doing wrong.

/Steen

Hi Thanks - it works :-)

"Ron de Bruin" wrote:

Hi Steen

Not possible to use this in your personal.xls(hidden workbook)

Insert the Calendar and copy the code in the sheet module of the sheet you want in the workbook you want.

--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"Steen" wrote in message ...
Hi

I am using the calendar code from Ron de Bruin's site put in PERSONAL.XLS:
http://www.rondebruin.nl/calendar.htm

I want to call OpenCalender from Sheet2:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
If Target.Row 4 And Target.Column = 6 Then
Cancel = True
Call OpenCalendar
End If
End Sub

But I get the errormessage "The macro 'test.xls!Module1.OpenCalendar' cannot
be found"

I seems that it can't "see" the macro in PERSONAL.XLS - any solutions, what
am I doing wrong.

/Steen