VBA Un semplice secondo timer

In VBA, un semplice secondo timer è facile da scrivere e includere nel codice sorgente. Il VBA è dotato di un timer completo che può essere utilizzato quando richiesto. Tuttavia, non è obbligatorio utilizzare il timer fornito con VBA. Il controllo del timer nel VBA può essere eseguito anche tramite un timer manuale. Non è un compito complicato creare una funzione di timer manuale nel VBA . Uno ha bisogno di scrivere il codice per creare un timer in un modulo pubblico. Con VBA, è possibile creare un secondo timer semplice per migliorare e personalizzare il software Office, in particolare per i fogli di lavoro Excel.

In VBA è disponibile la funzione Timer, ma è anche possibile crearne una molto facilmente.

In un modulo:

 Private Sub Worksheet_SelectionChange (ByVal Target As Range) 'Ad esempio: Avvia / Arresta il timer ogni volta che la cella. 'ma può anche essere posizionato su un pulsante o un altro ... TimeOnOFF = Not TimeOnOFF Se TimeOnOFF Then Timer End Sub 

In un modulo pubblico:

 Public TimeOnOFF As Boolean Sub Timer () Dim S As Integer While TimeOnOFF = True If Second (Now)> S Or Second (Now) = 0 Quindi 'Esegui codice' .... 'ad esempio Fogli ("shee1"). Intervallo ("A1"). Valore = Tempo S = Secondo (Ora) Fine Se DoEvents Wend End Sub