Home |
Search |
Today's Posts |
|
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
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 |
#2
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
I don't see anything on Ron's page that references the function
"OpenCalendar". Post THAT code and we'll see what the problem is. -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com (email address is on the web site) "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 |
#3
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Hi Chip
Thaks for replying. The following code is in Macro1 under PERSONAL.XLS Option Explicit Sub OpenCalendar() ' Displays the UserForm and calendar ' Shortcuts should be made to this procedure frmCalendar.Show End Sub Does that give you a clue? "Chip Pearson" wrote: I don't see anything on Ron's page that references the function "OpenCalendar". Post THAT code and we'll see what the problem is. -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com (email address is on the web site) "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 |
#4
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Ahhhaa
You use this example http://www.fontstuff.com/vba/vbatut07.htm Read the page good and you find your answer -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "Steen" wrote in message ... Hi Chip Thaks for replying. The following code is in Macro1 under PERSONAL.XLS Option Explicit Sub OpenCalendar() ' Displays the UserForm and calendar ' Shortcuts should be made to this procedure frmCalendar.Show End Sub Does that give you a clue? "Chip Pearson" wrote: I don't see anything on Ron's page that references the function "OpenCalendar". Post THAT code and we'll see what the problem is. -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com (email address is on the web site) "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 |
#5
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Hi Chip
I have copied the code from PERSONAL.XLS to the Module/sheet where I use it and that works. Thans for your help. "Steen" wrote: Hi Chip Thaks for replying. The following code is in Macro1 under PERSONAL.XLS Option Explicit Sub OpenCalendar() ' Displays the UserForm and calendar ' Shortcuts should be made to this procedure frmCalendar.Show End Sub Does that give you a clue? "Chip Pearson" wrote: I don't see anything on Ron's page that references the function "OpenCalendar". Post THAT code and we'll see what the problem is. -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com (email address is on the web site) "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 |
#6
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Instead of this:
Call OpenCalendar could you have used: Application.run "Personal.xls!OpenCalendar" Steen wrote: Hi Chip I have copied the code from PERSONAL.XLS to the Module/sheet where I use it and that works. Thans for your help. "Steen" wrote: Hi Chip Thaks for replying. The following code is in Macro1 under PERSONAL.XLS Option Explicit Sub OpenCalendar() ' Displays the UserForm and calendar ' Shortcuts should be made to this procedure frmCalendar.Show End Sub Does that give you a clue? "Chip Pearson" wrote: I don't see anything on Ron's page that references the function "OpenCalendar". Post THAT code and we'll see what the problem is. -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com (email address is on the web site) "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 -- Dave Peterson |
#7
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Chip,
Please email me. Sincerely, Christmas May |
#8
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
right at the bottom of the page
http://www.cpearson.com/ is Chip's email address. -- Regards, Tom Ogilvy "Christmas May" wrote in message ... Chip, Please email me. Sincerely, Christmas May |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
On call calendar question | Excel Discussion (Misc queries) | |||
Call up form calendar form VBA | Excel Programming | |||
Modify Yearly Calendar to Monthly Calendar Excel 2000? | Excel Programming | |||
Call Center Management: How to calculate 'cost per call' | Excel Discussion (Misc queries) | |||
call up a calendar | Excel Programming |