Come generare una data della settimana o del fine settimana casuale in Excel?

Questo tutorial parla di generare solo giorni feriali casuali o solo date del fine settimana casuali in Excel, segui i passaggi seguenti per ottenere maggiori dettagli.

Genera solo un giorno feriale casuale in Excel

Genera solo giorni feriali casuali o solo fine settimana casuali 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 della settimana in un intervallo di date di cui hai bisogno.

Il metodo 1 genera un giorno della settimana casuale con la formula

Seleziona una cella e digita questa formula = DATE (2014, 1, 1) + LARGE (IF (WEEKDAY (DATE (2014, 1, 1) + ROW ($ 1: $ 365) -1, 2) <6, ROW ($ 1: $ 365) -1, " ), RANDBETWEEN (1, SUM (- (WEEKDAY (DATE (2014, 1, 1) + ROW ($ 1: $ 365) -1, 2) <6)))), Quindi premere Maiusc + Ctrl + Invio contemporaneamente, quindi trascina la maniglia di riempimento su un intervallo che desideri generare nei giorni feriali. Vedi screenshot:

Suggerimento:

1. Se desideri generare giorni feriali casuali univoci, puoi utilizzare questa formula =DATE(2014, 1, 1)+(LARGE(IF(WEEKDAY((DATE(2014, 1, 1)+ROW($1:$365)-1)*((COUNTIF($A$1:A1, DATE(2014, 1, 1)+ROW($1:$365)-1))=0), 2)<6, ROW($1:$365)-1, ""), RANDBETWEEN(1, SUM(--(WEEKDAY((DATE(2014, 1, 1)+ROW($1:$365)-1)*((COUNTIF($A$1:A1, DATE(2014, 1, 1)+ROW($1:$365)-1))=0), 2)<6))))) e ricordati di premere Maiusc + Ctrl + Invio.

2. Nelle formule precedenti, 2014,1,1 è la data di inizio dell'intervallo di date necessario, 365 è il numero di giorni nell'intervallo di date, è possibile modificarli in base alle esigenze.

3. Non è possibile inserire la formula che genera giorni feriali casuali unici in A1.

Il metodo 2 genera un giorno della settimana casuale entro un anno con VBA

Se vuoi randomizzare i giorni della settimana entro un anno e hai familiarità con VBA, puoi fare come di seguito:

1. Stampa Alt + F11 chiavi per aprire Microsoft Visual Basic, Applications Edition finestra.

2. Clic inserire > Moduli, quindi incolla sotto il codice VBA nelle finestre a comparsa.

VBA: randomizza il giorno della settimana 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. Salvare il codice e chiudere la finestra per tornare indietro al foglio di lavoro e digitare questa formula= RandomizeDates (2014) in una cella, quindi premere entrare e trascina la maniglia di riempimento su un intervallo di cui hai bisogno. Vedi screenshot:

Genera solo giorni feriali casuali o solo fine settimana casuali con Kutools per Excel

Dopo installazione gratuita Kutools per Excel, per favore fai come di seguito:

1. Selezionare un intervallo in cui si desidera generare i giorni feriali o le date del fine settimana, quindi fare clic su Kutools > Inserisci dati casuali. Vedi screenshot:

2. Nel Inserisci dati casuali finestra di dialogo, fare clic Data scheda e poi pulsante calendario per selezionare una data di inizio e una data di fine desiderate, quindi seleziona Workday or fine settimana opzione di cui hai bisogno, se vuoi generare una data unica, puoi controllare Unico opzione. Vedi screenshot:

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

Suggerimento: Se puoi inserire dati duplicati, deseleziona semplicemente Valori unici nella finestra di dialogo

Con la funzione Inserisci dati casuali, puoi anche randomizzare numeri interi, ora, stringhe e elenchi personalizzati. Clicca qui per maggiori informazioni.

Articoli relativi

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