Come generare una data casuale di un giorno feriale o del fine settimana in Excel?

Questa guida spiega come generare solo giorni feriali casuali o solo date del fine settimana in Excel. Segui i passaggi seguenti per ulteriori dettagli.

Genera solo un giorno feriale casuale in Excel

Genera solo un giorno feriale casuale o solo un fine settimana casuale con Kutools per Excel

Genera solo un giorno feriale casuale in Excel

In Excel, ci sono due metodi che possono aiutarti a randomizzare solo i giorni feriali all'interno di un intervallo di date secondo necessità.

Metodo 1: genera un giorno feriale casuale con una formula

Seleziona una cella e inserisci questa formula =DATA(2014; 1; 1)+GRANDE(SE(GIORNO.SETTIMANA(DATA(2014; 1; 1)+RIF.RIGA($1:$365)-1; 2)<6; RIF.RIGA($1:$365)-1; ""); CASUALE.TRA(1; SOMMA(--(GIORNO.SETTIMANA(DATA(2014; 1; 1)+RIF.RIGA($1:$365)-1; 2)<6)))), quindi premi Maiusc + Ctrl + Invio contemporaneamente, poi trascina la maniglia di riempimento su un intervallo in cui desideri generare il giorno feriale. Vedi screenshot:

Suggerimento:

1. Se vuoi generare giorni feriali casuali univoci, puoi usare questa formula =DATA(2014; 1; 1)+(GRANDE(SE(GIORNO.SETTIMANA((DATA(2014; 1; 1)+RIF.RIGA($1:$365)-1)*((CONTA.SE($A$1:A1; DATA(2014; 1; 1)+RIF.RIGA($1:$365)-1))=0); 2)<6; RIF.RIGA($1:$365)-1; ""); CASUALE.TRA(1; SOMMA(--(GIORNO.SETTIMANA((DATA(2014; 1; 1)+RIF.RIGA($1:$365)-1)*((CONTA.SE($A$1:A1; DATA(2014; 1; 1)+RIF.RIGA($1:$365)-1))=0); 2)<6))))) e ricorda di premere Maiusc + Ctrl + Invio.

2. Nelle formule sopra, 2014,1,1 è la data di inizio dell'intervallo di date necessario, 365 è il numero di giorni nell'intervallo di date, puoi modificarli secondo necessità.

3. Non puoi inserire la formula che genera giorni feriali casuali univoci in A1.

Metodo 2: genera un giorno feriale casuale entro un anno con VBA

Se vuoi randomizzare i giorni feriali entro un anno e sei familiare con VBA, puoi procedere come segue:

1. Premi i tasti Alt + F11 per aprire la finestra Microsoft Visual Basic for Applications.

2. Clicca Inserisci > Modulo, quindi incolla il seguente codice VBA nella finestra che appare.

VBA: Randomizza il giorno feriale entro un anno.

Dim RandomizedYet As Boolean
'Updateby20150108
Function RandomizeDates(pYear As Long)
	Dim i As Long
	Dim DaysInYear As Long
	Dim xIndex As Long
	Dim RndIndex As Long
	Dim Temp As Date
	Dim Weekdays() As Variant
	If Not RandomizedYet Then
		RandomizedYet = True
		Randomize
	End If
	DaysInYear = DateSerial(pYear + 1, 1, 1) - DateSerial(pYear, 1, 1)
	ReDim Weekdays(1 To DaysInYear)
	For i = 1 To DaysInYear
		If Weekday(DateSerial(pYear, 1, i), vbMonday) < 6 Then
			xIndex           = xIndex + 1
			Weekdays(xIndex) = DateSerial(pYear, 1, i)
		End If
	Next
	ReDim Preserve Weekdays(1 To xIndex)
	For i = xIndex To 1 Step - 1
		RndIndex = Int(i * Rnd + 1)
		Temp = Weekdays(RndIndex)
		Weekdays(RndIndex) = Weekdays(i)
		Weekdays(i) = Temp
	Next
	RandomizeDates = Application.WorksheetFunction.Transpose(Weekdays)
End Function

3. Salva il codice e chiudi la finestra per tornare al tuo foglio di lavoro, quindi inserisci questa formula=RandomizzaDate(2014) in una cella, quindi premi Invio e trascina la maniglia di riempimento su un intervallo di cui hai bisogno. Vedi screenshot:

Genera solo un giorno feriale casuale o solo un fine settimana casuale con Kutools per Excel

Dopo aver installato gratuitamente Kutools per Excel, procedi come segue:

1. Seleziona un intervallo in cui desideri generare giorni feriali o date del fine settimana, quindi clicca Kutools > Inserisci dati casuali. Vedi screenshot:

2. Nella Inserisci dati casuali finestra di dialogo, clicca sulla scheda Data e poi sul pulsante calendario per selezionare una data di inizio e una data di fine desiderate, quindi seleziona l'opzione Giorno lavorativo o Fine settimana di cui hai bisogno. Se vuoi generare una data univoca, puoi selezionare l'opzione Univoco . Vedi screenshot:

3. Clicca Ok per applicare e chiudere la finestra di dialogo, quindi nella selezione verranno generate le date univoche del fine settimana.

Suggerimento: se ti è consentito inserire dati duplicati, basta deselezionare Valori univoci nella finestra di dialogo.

Con la funzione Inserisci dati casuali, puoi anche randomizzare numeri interi, orari, stringhe ed elenchi personalizzati. Clicca qui per ulteriori informazioni.

Articoli correlati

• Numero casuale senza duplicati in Excel
• Numero decimale o intero casuale in Excel