我想在excel工作表中启动和停止两个计时器。这就是我所拥有的:
打开工作表时,会触发此模块:
Sub SetOpenTimer()
OpenTimer = Now + TimeValue("00:00:10")
Application.OnTime OpenTimer, "StartTimerShutdownForm"
End Sub
10秒后(在本例中),触发了子startimershutdownform
:
Sub StartTimerShutdownForm()
UserForm1.Show
End Sub
显示用户表单,其中显示消息。在Userform的initialize子中,触发了子setformtimer
:
Sub setFormTimer()
FormTimer = Now + TimeValue("00:00:10")
Application.OnTime FormTimer, "Shutdown"
End Sub
如果setformtimer
中的此计时器结束,则触发子shutdown
此子关闭工作簿,但在Userform中有一个按钮供用户取消setformtimer
:
Sub stopFormTimer()
Application.OnTime EarliestTime:=FormTimer, _
Procedure:="setOpenTimer", Schedule:=False
End Sub
这假设要停止setformtimer
,但它不起作用。
当此计时器停止时,它会重新启动打开文档时触发的计时器,因此全部重新启动,但停止计时器代码不起作用。
在stopFormTimer
,setFormTimer
和StartTimerShutdownForm
所在的模块中,我在顶部声明了这些
Dim OpenTimer As Date
Dim FormTimer As Date
我在这里缺少什么?为什么我不能停止计时器并重新启动第一个计时器?
答案 0 :(得分:0)
我认为问题是你在两个潜艇中有不同的proc名称。他们必须匹配。我试试:
{
"bloggtyp": "recept",
"rubrik": "MOROTSSOPPA",
"gillar": 17,
"kommentarer": 3,
"kommentar": [{
"kommentartid": "2016-12-12",
"rubrik": "hej",
"textkommentar": "jättefinblogg",
"nickname": "liam"
},{
"kommentartid": "2016-12-13",
"rubrik": "hej",
"textkommentar": "jättefinblogg",
"nickname": "keeo"
},{
"kommentartid": "2016-12-11",
"rubrik": "hej",
"textkommentar": "jättefinblogg",
"nickname": "madad"
}],
"timestamp": "2012 - 04 - 23",
"taggar": ["morötter", "soppa", "förrätter"],
"tid": {
"tillagning": 5,
"på spisen": 30
},
"img": "/bilder/ < filnamn.filextension >",
"instruktioner": "Gör sa här: Skala morötterna – med din kropp! Koka i buljong.Salta och peppra efter tycke och smak.",
"ingredienser": [{
"typ": "Morötter",
"gram": 500,
"kcal/100g": 41
}, {
"typ": "buljong",
"dl": 10,
"kcal/100g": 128
}, {
"typ": "salt",
"tsk": 1,
"kcal/100g": 0
}, {
"typ": "peppar",
"tsk": 1,
"kcal/100g": 0
}]
}
{
"bloggtyp": "recept",
"rubrik": "BARKBROED MED TOMATSALSA",
"gillar": 0,
"kommentarer": 1,
"kommentar": [{
"kommentartid": "2016-12-12",
"rubrik": "hej",
"textkommentar": "jättefinblogg",
"nickname": "liam"
}],
"timestamp": "2016 - 10 - 20",
"taggar": ["broed", "tomater", "såser"],
"tid": {
"tillagning": 20,
"på spisen": 30
},
"img": "/bilder/ < filnamn.filextension >",
"instruktioner": "Gör sa här: Blanda ihop allt. Knada. Baka i 200 grader i 30minuter eller tills de fått smarrig, fin färg.",
"ingredienser": [{
"typ": "rågmjöl",
"dl": 3.5,
"kcal/100g": 44
}, {
"typ": "salt",
"tsk": 1,
"kcal/100g": 0
}, {
"typ": "hemgnagt barkmjöl",
"dl": 1.5,
"kcal/100g": 96
}, {
"typ": "vatten",
"dl": 2,
"kcal/100g": 0
}, {
"typ": "tomatsalsa på burk",
"st": 1,
"kcal/100g": 699
}
]
}
{
"bloggtyp": "recept",
"rubrik": "PADTHAI",
"gillar": 0,
"kommentarer": 1,
"kommentar": [{
"kommentartid": "2016-12-12",
"rubrik": "hej",
"textkommentar": "jättefinblogg",
"nickname": "liam"
}],
"timestamp": "2016 - 11 - 20",
"taggar": ["thai", "mat", "gott"],
"tid": {
"tillagning": 5,
"på spisen": 10
},
"img": "/bilder/ < filnamn.filextension >",
"instruktioner": "Gör så här: sätt värmen på 300grader och blanda alla ingredienser",
"ingredienser": [{
"typ": "toa nga",
"dl": 5,
"kcal/100g": 144
}, {
"typ": "salt",
"tsk": 4,
"kcal/100g": 0
}, {
"typ": "thai sås",
"dl": 2,
"kcal/100g": 96
}, {
"typ": "vatten",
"dl": 2,
"kcal/100g": 0
}, {
"typ": "tomatsalsa på burk",
"st": 1,
"kcal/100g": 699
}
]
}
{
"bloggtyp": "recept",
"rubrik": "kyckling panang",
"gillar": 0,
"kommentarer": 1,
"kommentar": [{
"kommentartid": "2016-12-12",
"rubrik": "hej",
"textkommentar": "jättefinblogg",
"nickname": "liam"
}],
"timestamp": "2016 - 9 - 20",
"taggar": ["thai", "mat", "bra"],
"tid": {
"tillagning": 6,
"på spisen": 11
},
"img": "/bilder/ < filnamn.filextension >",
"instruktioner": "Gör så här: sätt värmen på 300grader och blanda alla ingredienser",
"ingredienser": [{
"typ": "toa nga",
"dl": 5,
"kcal/100g": 144
}, {
"typ": "salt",
"tsk": 4,
"kcal/100g": 0
}, {
"typ": "thai sås",
"dl": 2,
"kcal/100g": 96
}
]
}
{
"bloggtyp": "recept",
"rubrik": "tom yam soup",
"gillar": 0,
"kommentarer": 1,
"kommentar": [{
"kommentartid": "2016-12-12",
"rubrik": "hej",
"textkommentar": "jättefinblogg",
"nickname": "liam"
}],
"timestamp": "2016 - 8 - 20",
"taggar": ["thai", "mat", "dåligt"],
"tid": {
"tillagning": 6,
"på spisen": 12
},
"img": "/bilder/ < filnamn.filextension >",
"instruktioner": "Gör så här: sätt värmen på 300grader och blanda alla ingredienser",
"ingredienser": [{
"typ": "böngroddar",
"dl": 5,
"kcal/100g": 198
}, {
"typ": "salt",
"tsk": 4,
"kcal/100g": 12
}, {
"typ": "thai sås",
"dl": 2,
"kcal/100g": 444
}
]
}
{
"bloggtyp": "mina böcker",
"rubrik": "självinsikt",
"gillar": 0,
"kommentarer": 1,
"kommentar": [{
"kommentartid": "2016-12-12",
"rubrik": "hej",
"textkommentar": "jättefinblogg",
"nickname": "liam"
}],
"timestamp": "2016 - 8 - 20",
"taggar": ["raw", "veggo", "varmrätter"],
"img": "/bilder/ < filnamn.filextension >",
"om boken": "denna är jättebra bok, kul"
}
{
"bloggtyp": "övrigt",
"rubrik": "deprimerad",
"gillar": 33,
"kommentarer": 1,
"kommentar": [{
"kommentartid": "2016-12-12",
"rubrik": "hej",
"textkommentar": "jättefinblogg",
"nickname": "liam"
}],
"timestamp": "2016 - 7 - 20",
"taggar": ["knyppling", "prozac", "hjälp"],
"img": [{
"dir": "/bilder/ < filnamn.filextension >"
}, {
"dir": "/bilder/ < filnamn2.filextension >"
}],
"om boken": "denna är jättebra bok, kul"
}