| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Ontime questions
I am trying to get an ontime routine working.
Here are my questions... Will it only run MACROS? or can it run a sub function Where do I decalre the PUBLIC varibles I tried to following in one of the modules (a_publicStuff): Public NextTime As Double 'to setup 15 minute time Public Const cRunIntervalSeconds = 900 ' 15 minutes Public Const cRunWhat = "settimer_Click" (if I put the above in my usercode area, the last two turn red) and the following is in my userform code area. Sub StartTimer() 'RunWhen = NextTime Application.OnTime earliesttime:=NextTime, procedu=cRunWhat, _ schedule:=True End Sub Sub settimer_Click() MsgBox Format(Application.RoundUp(Time * 96, 0) / 96, "hh:mm:ss") NextTime = NextTime + cRunIntervalSeconds MsgBox cRunIntervalSeconds MsgBox Format(NextTime, "hh:mm:ss") End Sub When I run my form, I get an error saying the macro can not be found. If I create a macro with the name, it functions, but the nexttime does not get incremented, and cRunIntervalSeconds is 0:00 Thanks Bruce |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Ontime questions
Chip,
How do I declare in a "standard code module"? What is the differance between a class and standard? I now this is probably very basic to most people here, but.... Thanks Bruce "Chip Pearson" wrote in message ... Bruce, You can't run procedures in a class module, only procedures in a standard code module. Moreover, you can't declare Public constants in a class module (which includes regular class modules, the ThisWorkbook module, sheet code modules, and userform code modules). Declare everything in a standard code module. -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "BruceJ" wrote in message news:VZFnb.54052$HS4.263894@attbi_s01... I am trying to get an ontime routine working. Here are my questions... Will it only run MACROS? or can it run a sub function Where do I decalre the PUBLIC varibles I tried to following in one of the modules (a_publicStuff): Public NextTime As Double 'to setup 15 minute time Public Const cRunIntervalSeconds = 900 ' 15 minutes Public Const cRunWhat = "settimer_Click" (if I put the above in my usercode area, the last two turn red) and the following is in my userform code area. Sub StartTimer() 'RunWhen = NextTime Application.OnTime earliesttime:=NextTime, procedu=cRunWhat, _ schedule:=True End Sub Sub settimer_Click() MsgBox Format(Application.RoundUp(Time * 96, 0) / 96, "hh:mm:ss") NextTime = NextTime + cRunIntervalSeconds MsgBox cRunIntervalSeconds MsgBox Format(NextTime, "hh:mm:ss") End Sub When I run my form, I get an error saying the macro can not be found. If I create a macro with the name, it functions, but the nexttime does not get incremented, and cRunIntervalSeconds is 0:00 Thanks Bruce |
|
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Ontime questions
Insert= module gives you a standard code module.
-- Regards, Tom Ogilvy "BruceJ" wrote in message news:ydRnb.55948$Tr4.127761@attbi_s03... Chip, How do I declare in a "standard code module"? What is the differance between a class and standard? I now this is probably very basic to most people here, but.... Thanks Bruce "Chip Pearson" wrote in message ... Bruce, You can't run procedures in a class module, only procedures in a standard code module. Moreover, you can't declare Public constants in a class module (which includes regular class modules, the ThisWorkbook module, sheet code modules, and userform code modules). Declare everything in a standard code module. -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "BruceJ" wrote in message news:VZFnb.54052$HS4.263894@attbi_s01... I am trying to get an ontime routine working. Here are my questions... Will it only run MACROS? or can it run a sub function Where do I decalre the PUBLIC varibles I tried to following in one of the modules (a_publicStuff): Public NextTime As Double 'to setup 15 minute time Public Const cRunIntervalSeconds = 900 ' 15 minutes Public Const cRunWhat = "settimer_Click" (if I put the above in my usercode area, the last two turn red) and the following is in my userform code area. Sub StartTimer() 'RunWhen = NextTime Application.OnTime earliesttime:=NextTime, procedu=cRunWhat, _ schedule:=True End Sub Sub settimer_Click() MsgBox Format(Application.RoundUp(Time * 96, 0) / 96, "hh:mm:ss") NextTime = NextTime + cRunIntervalSeconds MsgBox cRunIntervalSeconds MsgBox Format(NextTime, "hh:mm:ss") End Sub When I run my form, I get an error saying the macro can not be found. If I create a macro with the name, it functions, but the nexttime does not get incremented, and cRunIntervalSeconds is 0:00 Thanks Bruce |
|
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Ontime questions
Bruce,
In VBA, go to the Insert menu and choose Module. Put the code in that module. -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "BruceJ" wrote in message news:ydRnb.55948$Tr4.127761@attbi_s03... Chip, How do I declare in a "standard code module"? What is the differance between a class and standard? I now this is probably very basic to most people here, but.... Thanks Bruce "Chip Pearson" wrote in message ... Bruce, You can't run procedures in a class module, only procedures in a standard code module. Moreover, you can't declare Public constants in a class module (which includes regular class modules, the ThisWorkbook module, sheet code modules, and userform code modules). Declare everything in a standard code module. -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "BruceJ" wrote in message news:VZFnb.54052$HS4.263894@attbi_s01... I am trying to get an ontime routine working. Here are my questions... Will it only run MACROS? or can it run a sub function Where do I decalre the PUBLIC varibles I tried to following in one of the modules (a_publicStuff): Public NextTime As Double 'to setup 15 minute time Public Const cRunIntervalSeconds = 900 ' 15 minutes Public Const cRunWhat = "settimer_Click" (if I put the above in my usercode area, the last two turn red) and the following is in my userform code area. Sub StartTimer() 'RunWhen = NextTime Application.OnTime earliesttime:=NextTime, procedu=cRunWhat, _ schedule:=True End Sub Sub settimer_Click() MsgBox Format(Application.RoundUp(Time * 96, 0) / 96, "hh:mm:ss") NextTime = NextTime + cRunIntervalSeconds MsgBox cRunIntervalSeconds MsgBox Format(NextTime, "hh:mm:ss") End Sub When I run my form, I get an error saying the macro can not be found. If I create a macro with the name, it functions, but the nexttime does not get incremented, and cRunIntervalSeconds is 0:00 Thanks Bruce |
|
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Ontime questions
Thaks!
Is there a way I can tell if an existing module is standard or class? Thanks Bruce "Tom Ogilvy" wrote in message ... Insert= module gives you a standard code module. -- Regards, Tom Ogilvy "BruceJ" wrote in message news:ydRnb.55948$Tr4.127761@attbi_s03... Chip, How do I declare in a "standard code module"? What is the differance between a class and standard? I now this is probably very basic to most people here, but.... Thanks Bruce "Chip Pearson" wrote in message ... Bruce, You can't run procedures in a class module, only procedures in a standard code module. Moreover, you can't declare Public constants in a class module (which includes regular class modules, the ThisWorkbook module, sheet code modules, and userform code modules). Declare everything in a standard code module. -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "BruceJ" wrote in message news:VZFnb.54052$HS4.263894@attbi_s01... I am trying to get an ontime routine working. Here are my questions... Will it only run MACROS? or can it run a sub function Where do I decalre the PUBLIC varibles I tried to following in one of the modules (a_publicStuff): Public NextTime As Double 'to setup 15 minute time Public Const cRunIntervalSeconds = 900 ' 15 minutes Public Const cRunWhat = "settimer_Click" (if I put the above in my usercode area, the last two turn red) and the following is in my userform code area. Sub StartTimer() 'RunWhen = NextTime Application.OnTime earliesttime:=NextTime, procedu=cRunWhat, _ schedule:=True End Sub Sub settimer_Click() MsgBox Format(Application.RoundUp(Time * 96, 0) / 96, "hh:mm:ss") NextTime = NextTime + cRunIntervalSeconds MsgBox cRunIntervalSeconds MsgBox Format(NextTime, "hh:mm:ss") End Sub When I run my form, I get an error saying the macro can not be found. If I create a macro with the name, it functions, but the nexttime does not get incremented, and cRunIntervalSeconds is 0:00 Thanks Bruce |
|
#7
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Ontime questions
by default if should have a name like module1 if it is a standard module
It will be listed in the project explorer in the VB Editor under the entry for modules under you workbook/project. If it is a class module it would be under Class. Any other type class module would not be listed as it is part of a sheet, thisworkbook or userform. -- Regards, Tom Ogilvy "BruceJ" wrote in message news:FYTnb.57751$e01.161947@attbi_s02... Thaks! Is there a way I can tell if an existing module is standard or class? Thanks Bruce "Tom Ogilvy" wrote in message ... Insert= module gives you a standard code module. -- Regards, Tom Ogilvy "BruceJ" wrote in message news:ydRnb.55948$Tr4.127761@attbi_s03... Chip, How do I declare in a "standard code module"? What is the differance between a class and standard? I now this is probably very basic to most people here, but.... Thanks Bruce "Chip Pearson" wrote in message ... Bruce, You can't run procedures in a class module, only procedures in a standard code module. Moreover, you can't declare Public constants in a class module (which includes regular class modules, the ThisWorkbook module, sheet code modules, and userform code modules). Declare everything in a standard code module. -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "BruceJ" wrote in message news:VZFnb.54052$HS4.263894@attbi_s01... I am trying to get an ontime routine working. Here are my questions... Will it only run MACROS? or can it run a sub function Where do I decalre the PUBLIC varibles I tried to following in one of the modules (a_publicStuff): Public NextTime As Double 'to setup 15 minute time Public Const cRunIntervalSeconds = 900 ' 15 minutes Public Const cRunWhat = "settimer_Click" (if I put the above in my usercode area, the last two turn red) and the following is in my userform code area. Sub StartTimer() 'RunWhen = NextTime Application.OnTime earliesttime:=NextTime, procedu=cRunWhat, _ schedule:=True End Sub Sub settimer_Click() MsgBox Format(Application.RoundUp(Time * 96, 0) / 96, "hh:mm:ss") NextTime = NextTime + cRunIntervalSeconds MsgBox cRunIntervalSeconds MsgBox Format(NextTime, "hh:mm:ss") End Sub When I run my form, I get an error saying the macro can not be found. If I create a macro with the name, it functions, but the nexttime does not get incremented, and cRunIntervalSeconds is 0:00 Thanks Bruce |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Find %ontime & SUMIF ontime ie: find matching sets within Range... | Excel Worksheet Functions | |||
| .ontime | Excel Discussion (Misc queries) | |||
| OnTime bug? | Excel Discussion (Misc queries) | |||
| OnTime VB | Excel Discussion (Misc queries) | |||
| OnTime VB | Excel Worksheet Functions | |||
![BruceJ[_2_] is offline](https://www.excelbanter.com/images/SultanThemeVB3R/statusicon/user_offline.gif)
Linear Mode
