Cronometro/ aumento numerico automatico

[marco_budinPartecipante marco_budin Karma: 2 pts]

ciao a tutti,

ho sviluppato un documento, dove vi sono 4 celle testo (rappresentate da celle (B1-B4)). B1 rappresenta il tempo (parte da 00:00:01) e quando si fa partire la macro con il tasto Start, parte a contare il tempo.

Quello che non riesco è il resto: in automatico quando schiaccio "Start" dovrebbero partire con il tempo anche le altre cifre:

- la cifra B2, progressivo 32000 a 32000 ogni secondo che passa.

- la cifra B3, progressiva di 230 a 230 ogni secondo che passa.

- la cifra B4, progressiva di 0.2 a 0.2 ogni secondo che passa.

continua ad andare fino a quando non schiaccio il tasto FINE.

spero che qualcuno saprà aiutarmi

in attesa ringrazio

saluti

Marco

Allegati:

You must be logged in to view attached files.

[Marius44Moderatore Marius44 Karma: 58 pts]

Ciao

Se ho capito bene, sostituisci con questa la tua macro

Sub nexttick()
With Sheets("Foglio1")
    .Range("B1").Value = .Range("B1").Value + TimeValue("00:00:01")
    .Range("B2").Value = .Range("B2").Value + 32000
    .Range("B3").Value = .Range("B3").Value + 230
    .Range("B4").Value = .Range("B4").Value + 0.2
End With
starttimer
End Sub

Prova e fai sapere. Ciao,
Mario

[marco_budinPartecipante marco_budin Karma: 2 pts]

ciao Marius44!

è perfetto e funziona alla grande!

ti ringrazio davvero per l' aiuto e ti auguro una buona serata

alla prossima

Marco

[Autore]

Articoli