066. Aggiungere Ore, Minuti, Mesi, Giorni a date

Download PDF

Domanda:
Con una macro dovrei incrementare e decrementare di un minuto l’intervallo di celle B5:B40,se contengono un orario da me inserito.

Risposta:
E’ possibile aggiungere Ore, Minuti, Mesi, Giorni a dalle date contenute nel foglio di lavoro
utilizzando la funzione “DateAdd” fornendole questi parametri:
DateAdd(Tipo di unità da aggiungere, Quantità da aggiungere, coordinate della data su cui operare)

Per risolvere l’esigenza del nostro lettore l’ho utilizzata in questo modo:

For i = 5 To 40
Sheet1.Cells(i, 3) = DateAdd(“n”, 1, Sheet1.Cells(i, 2))
Next i

Con “n” ho indicato che volevo aggiungere minuti, 1 è il numero di minuti da aggiungere)
Per sapere i parametri che identificano, ore, mesi, etc vi rimando al seguente link:
https://msdn.microsoft.com/it-it/library/hcxe65wz(v=vs.90).aspx

Allego il file d’esempio
APRI

Riccardo Vincenti

The following two tabs change content below.