VBA Prosty drugi timer

W VBA prosty drugi timer jest łatwy do napisania i dołączenia do kodu źródłowego. VBA jest wyposażony w w pełni funkcjonalny timer, który można wykorzystać w razie potrzeby. Jednak nie jest obowiązkowe korzystanie z licznika czasu dostarczonego z VBA. Sterowanie czasowe w VBA można również wykonać za pomocą ręcznego timera. Stworzenie funkcji ręcznego timera w VBA nie jest skomplikowanym zadaniem. Trzeba napisać kod, aby utworzyć timer w module publicznym. Dzięki VBA można utworzyć prosty drugi timer, aby ulepszyć i dostosować oprogramowanie Office, szczególnie do arkuszy Excel.

W VBA dostępna jest funkcja Timer, ale można ją również bardzo łatwo utworzyć.

W arkuszu modułu:

 Private Sub Worksheet_SelectionChange (ByVal Target As Range) 'Na przykład: Start / Stop timer za każdym razem, gdy komórka. 'ale może być także umieszczony na przycisku lub innym ... TimeOnOFF = Nie TimeOnOFF, jeśli TimeOnOFF Następnie Timer End Sub 

W module publicznym:

 Public TimeOnOFF jako Boolean Sub Timer () Dim S jako Integer podczas TimeOnOFF = True Jeśli Second (Now)> S lub Second (Now) = 0 Następnie 'Uruchom kod' .... 'na przykład Arkusze ("shee1"). Zakres ("A1"). Wartość = Czas S = Drugi (Teraz) Koniec Jeśli DoEvents Wend End Sub