Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Macro vba-Aggiungere un'ora ad un campo date-time

631 views
Skip to first unread message

PrinsipeMilito

unread,
Jan 10, 2012, 4:18:44 PM1/10/12
to
Ciao a tutti,
ho una cella excel che contiene un campo data-ora , formato : 10-01-2012
18:00 vorrei aggiungere un'ora e sostituire con il nuovo risultato, quindi
deve diventare 10-01-2012 19:00 ma non so come fare per aggiungere sta
benedetta ora in più (codice vba o funzione nativa excel va bene comunque)
grazie mille


r

unread,
Jan 10, 2012, 4:28:12 PM1/10/12
to
On 10 Gen, 22:18, "PrinsipeMilito" <ste.cr...@hotmail.it> wrote:
> Ciao a tutti,
> ho una cella excel che contiene un campo data-ora , formato : 10-01-2012
> 18:00 vorrei aggiungere un'ora e sostituire con il nuovo risultato, quindi
> deve diventare 10-01-2012 19:00   ma non so come fare  per aggiungere sta
> benedetta ora in pi (codice vba o funzione nativa excel va bene comunque)
> grazie mille

la data ora in A1
=A1+"1:0"
saluti
r

r

unread,
Jan 10, 2012, 4:31:36 PM1/10/12
to
prima che arrivi plinius:
=A1+"1:"
:-)
r

LucaS

unread,
Jan 11, 2012, 9:07:09 AM1/11/12
to
On 10 Gen, 22:18, "PrinsipeMilito" <ste.cr...@hotmail.it> wrote:
ciao sto lavorando anch'io con celle tipo data ora.
io ho risolto in vba fissando una costante ORA = 0.041666667
che corrisponde ad decimale di un'ora.

a quel punto puoi anche usare .Value = .Value + ORA

Luca

Mauro Gamberini

unread,
Jan 11, 2012, 10:11:04 AM1/11/12
to
"LucaS" ha scritto nel messaggio
news:d10db90c-9e8f-4cee...@m4g2000vbc.googlegroups.com...
***********************************

Guida del vb di Excel: Funzione DataAdd

Public Sub m()
ActiveCell.Offset(0, 1).Value = DateAdd("h", 1, ActiveCell.Value)
End Sub
--
---------------------------
Mauro Gamberini
Microsoft MVP - Excel
http://www.riolab.org/
http://www.maurogsc.eu/

Mauro Gamberini

unread,
Jan 11, 2012, 10:12:35 AM1/11/12
to


> Guida del vb di Excel: Funzione DataAdd
>

Guida del vb di Excel: Funzione DateAdd

eliano

unread,
Jan 11, 2012, 10:13:45 AM1/11/12
to
Ciao Luca.
Forse potevi presentare la tua costante in maniera un po' diversa.
Excel ragiona in ternini di giorni e quindi, visto che il giorno e'
formato da 24 ore, un'ora dovrebbe esse un 24esimo di giorno.
Cioe', matematicamente parlando: 1 ora = 1/24 = 0,041667 dove, essendo
il 6 periodico, viene arrotondato a 7 in funzione del numero massimo
di decimali voluti.

Nel caso specifico (e non solo in Vba):
In A1; =10.00
in B1: =A1+1/24
Ovviamente, sia A1 che B1 formattate come ora.

Saluti
Eliano

LucaS

unread,
Jan 12, 2012, 3:14:23 AM1/12/12
to
Eliano e Mauro grazie mille per l'aiuto

Mauro Gamberini

unread,
Jan 12, 2012, 6:06:13 AM1/12/12
to

> Eliano e Mauro grazie mille per l'aiuto
>

;-)

eliano

unread,
Jan 12, 2012, 6:18:23 AM1/12/12
to
On 12 Gen, 12:06, "Mauro Gamberini"
<maurogscRIMUOV...@RIMUOVEREaliceposta.it> wrote:
> > Eliano e Mauro grazie mille per l'aiuto
>
> ;-)

(-; [tanto per fare un "vis a vis"]

Ciao
Eliano
0 new messages