[VBA] jak vytvořit procedůru pro timer

[VBA] jak vytvořit procedůru pro timer otázka

dobrý den,

chci se zeptat do wordu vba jsi vytvořím nový timer

dim cas as new timer
cas.enable = true
cas.interval = 3000

jak ale nastavit co se má stát každých 3000 ms?

nahlásit spam

odpovědět

Timer ve VBA není třída ani typ, ale funkce, která vrací počet sekund uplynutých od půlnoci. Můžete tedy zachytit časový okamžik (třeba Start = Timer) a po přičtení intervalu kontrolovat v opakovacím cyklu, zda nastal potřebný okamžik, popř. použít rekurzi.

Kód, který uvádíte, je chybný - nepoužitelný.

nahlásit spam

odpovědět

Pomocí funkce Timer přímo zde:

http://www.vbnet.cz/forum-tema--5321-tim...

Využití OnTime metody

nebo API SetTimer,KillTimer a TimerProc :

http://www.cpearson.com/excel/OnTime.asp...

nahlásit spam

odpovědět

DotNETcollege: Mohlo by vás zajímat

MAUI - multiplatformní aplikace v .NETu

Úvod do XAML

Vyvíjíme univerzální aplikace pro Windows

Kontejnery, Docker a Azure Kubernetes Service (AKS)

TypeScript

Testování v prostředí .NET - unit testy a integrační testy

Kontinuální integrace pomocí TeamCity

Entity Framework pro pokročilé

Xamarin - vývoj multiplatformních mobilních aplikací

Javascript pro mírně pokročilé

Chcete-li vytvářet instance timeru pomocí New,tak

si budete muset vytvořit vlastní třídu s timerem.

nahlásit spam

odpovědět

dim cas as new timer
cas.enable = true
cas.interval = 3000
AddHandler cas.Tik, AddressOf Procedura

Private Sub Procedura()
'Sem vlozit potrebny kod

end sub

nahlásit spam

odpovědět

Oprava cas.Tik na cas.Tick

nahlásit spam

odpovědět

... a oprava cas.enable = True na cas.Enabled = True - ale ne pro VBA!

nahlásit spam

1 / 1

odpovědět

díky funguje

nahlásit spam

odpovědět

otázka připomínka kladné hodnocení záporné hodnocení

Nadpis:

Antispam:

Komu se občas házejí perly?

Příspěvek bude publikován pod identitou anonym.

Administrátoři si vyhrazují právo komentáře upravovat či mazat bez udání důvodu.
Mazány budou zejména komentáře obsahující vulgarity nebo porušující pravidla publikování.

Pokud nejste zaregistrováni, Vaše IP adresa bude zveřejněna. Pokud s tímto nesouhlasíte, příspěvek neodesílejte.

dotNETportal.cz