Come si fa a elencare tutte le date comprese tra due date in Excel?
In alcuni casi, quando si dispone di una data di inizio e una data di fine specifiche, potrebbe essere necessario generare un elenco di tutte le date comprese tra queste due date in Excel. Questo tutorial illustra i metodi per farlo in modo semplice ed efficace.
Elencare tutte le date comprese tra due date mediante formule
Elencare tutte le date comprese tra due date con Kutools per Excel ![]()
Elencare tutte le date comprese tra due date con VBA
Elencare tutte le date comprese tra due date mediante formule
Di seguito trovi formule che ti permettono di elencare rapidamente tutte le date comprese tra due date specificate in Excel.
1. Inserisci la data iniziale e la data finale in due celle; nell’esempio, sono state inserite nelle celle A1 e A2. Guarda lo screenshot:
2. Passare quindi alla cella C1 e digitare la seguente formula =A1+1 al suo interno, quindi premere il tasto Invio. Vedere lo screenshot:
3. Nella cella C2, inserisci questa formula:=IF($A$1+ROW(A1)>=$A$2-1,«»,C1+1), quindi trascina il quadratino di riempimento verso il basso finché non appare una cella vuota. Guarda gli screenshot:

A questo punto puoi visualizzare tutte le date comprese tra le due specificate, elencate nella colonna.
Nota:
Nelle formule sopra indicate, A1 rappresenta la data di inizio, A2 la data di fine e C1 la prima data compresa nell’intervallo di date.
Elencare tutte le date comprese tra due date con Kutools per Excel
In realtà, installando Kutools per Excel – uno strumento aggiuntivo pratico – puoi sfruttare subito la funzione Inserisci dati casuali per risolvere questo problema.
Dopo aver installato gratuitamenteKutools per Excel, procedere come segue:
1. Seleziona una colonna in cui desideri elencare le date comprese tra due date e fai clic su Kutools > Inserisci > Inserisci dati casuali. Vedere lo screenshot:
2. Nella finestra di dialogo Inserisci dati casuali, fai clic sulla scheda Data, quindi seleziona la data iniziale e la data finale nei campi Da e A. Assicurati infine di spuntare le caselle Giorni feriali, Fine settimana e Valori univoci. Vedere lo screenshot:
3. Fare clic su OK per chiudere la finestra di dialogo; ne apparirà un'altra denominata Kutools per Excel. Fare semplicemente clic su Sì. A questo punto sarà possibile visualizzare le date comprese tra Data di inizio e Data di fine. Vedere gli screenshot:

4. Ora è necessario ordinare l'elenco delle date in base alle proprie esigenze. Fare clic su Dati > Ordina dal più vecchio al più recente. Le date verranno così ordinate cronologicamente, dalla più vecchia alla più recente. Vedere gli screenshot:

Con l'utilità Inserisci dati casualiè possibile anche inserire numeri interi casuali, stringhe casuali, orari casuali e molto altro.Fare clic qui per ulteriori informazioni su Inserisci dati casuali.
Elencare tutte le date comprese tra due date con VBA
Se sei interessato al codice macro, puoi utilizzare la seguente procedura VBA per elencare tutte le date comprese tra due date specificate in Excel.
1. Inserisci la Data di inizio e la Data di fine in due celle; nell’esempio, sono state digitate nelle celle A1 e B1. Guarda lo screenshot:
2. Premere i tasti Alt+F11 per aprire la finestra di Microsoft Visual Basic, Applications Edition.
3. Fare quindi clic su Inserisci > Modulo e copiare e incollare il seguente codice VBA nella finestra del Modulo visualizzata.
VBA: elencare tutte le date comprese tra due date.
Sub WriteDates()
'Updateby20150305
Dim rng As Range
Dim StartRng As Range
Dim EndRng As Range
Dim OutRng As Range
Dim StartValue As Variant
Dim EndValue As Variant
xTitleId = "KutoolsforExcel"
Set StartRng = Application.Selection
Set StartRng = Application.InputBox("Start Range (single cell):", xTitleId, StartRng.Address, Type: = 8)
Set EndRng = Application.InputBox("End Range (single cell):", xTitleId, Type: = 8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type: = 8)
Set OutRng = OutRng.Range("A1")
StartValue = StartRng.Range("A1").Value
EndValue = EndRng.Range("A1").Value
If EndValue - StartValue <= 0 Then
Exit Sub
End If
ColIndex = 0
For i = StartValue To EndValue
OutRng.Offset(ColIndex, 0) = i
ColIndex = ColIndex + 1
Next
End Sub 4. Fare clic su Esegui oppure su F5 per eseguire la macro VBA. Verrà visualizzata una finestra di dialogo in cui selezionare la data di inizio: fare clic su OK, quindi selezionare la data di fine nella seconda finestra di dialogo che appare. Vedere lo screenshot:

5. Fare clic su OK, quindi selezionare una cella in cui inserire le date e fare nuovamente clic su OK. A questo punto, potrai visualizzare tutte le date comprese tra le due specificate. Ecco gli screenshot:

Nota: l'elenco generato da questa macro VBA include sia la data di inizio che la data di fine.
Elencare tutte le date comprese tra due date
Articoli correlati:
Migliori Strumenti per la Produttività in Office
Potenzia le tue competenze in Excel con Kutools per Excel e sperimenta un’efficienza mai vista prima.Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e Risparmia tempo.Clicca qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab Porta l'interfaccia a schede in Office e rende il tuo lavoro molto più semplice
- Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede all’interno della stessa finestra, invece che in finestre separate.
- Aumenta la tua produttività del 50 % e risparmia centinaia di clic del mouse ogni giorno!
Tutti i componenti aggiuntivi di Kutools in un unico programma di installazione.
Kutools for Office è la suite che include componenti aggiuntivi per Excel, Word, Outlook e PowerPoint, oltre a Office Tab Pro: la soluzione ideale per i team che lavorano su diverse app di Office.
- Suite completa— componenti aggiuntivi per Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Un unico programma di installazione, una sola licenza— configurazione in pochi minuti (pronto per MSI)
- Funziona meglio insieme— produttività ottimizzata tra le app di Office
- Prova gratuita di 30 giorni con tutte le funzionalità— nessuna registrazione, nessuna carta di credito
- Miglior rapporto qualità-prezzo— risparmia rispetto all’acquisto dei singoli componenti aggiuntivi