Visualizzare l'orario su Excel tramite macro

In questa lezione del corso Excel ti spiego come visualizzare l'ora corrente sul foglio di calcolo tramite una macro usando la funzione

Time()

Ti faccio un esempio pratico

Digita questa macro

1. Sub Prova()
2. Dim orario As Date
3. orario = Time()
4. Range("B2").Select
5. ActiveCell.FormulaR1C1 = orario
6. End Sub

La macro crea una variabile con nome "orario" e tipo Date tramite l'istruzione Dim orario As Date

L'istruzione orario=Time() assegna l'orario corrente alla variabile.

Nella riga successiva la macro attiva la cella B2 tramite l'istruzione Range("B2").Select

Infine, visualizza il contenuto della variabile orario nella cella attiva tramite l'istruzione ActiveCell.FormulaR1C1 = orario.

Per visualizzare soltanto l'ora corrente modifica la macro in questo modo

Digita questa macro

1. Sub Prova()
2. Dim orario As Date
3. Dim ore As Integer
4. orario = Time()
5. ore = Int(orario * 24)
6. Range("B2").Select
7. ActiveCell.FormulaR1C1 = orario
8. Range("C2").Select
9. ActiveCell.FormulaR1C1 = ore
10. End Sub

Nella macro hai inserito una nuova variabile ore tramite l'istruzione Dim orario As Date

L'istruzione ore = Int(orario * 24) assegna alla variabile il numero di ore dell'orario corrente.

Poi la visualizza nella cella C2