Suddividi i dati in più fogli di lavoro in base al conteggio delle righe in Excel
La divisione efficiente di un ampio intervallo di dati in più fogli di lavoro Excel in base a un conteggio di righe specifico può semplificare la gestione dei dati. Ad esempio, dividere un set di dati ogni 5 righe in più fogli può renderlo più gestibile e organizzato. Questa guida offre due metodi pratici per eseguire questa attività in modo rapido e semplice.
Dividi i dati in più fogli di lavoro in base al conteggio delle righe con il codice VBA
Dividi i dati in più fogli di lavoro in base al conteggio delle righe con Kutools per Excel
Dividi i dati in più fogli di lavoro in base al conteggio delle righe con il codice VBA
Il seguente codice VBA può aiutarti a dividere le righe in più fogli di lavoro in base al conteggio delle righe, fai come segue:
1. Tieni premuto il ALT + F11 chiave per aprire il Microsoft Visual Basic, Applications Edition finestra.
2. Clic inserire > Modulie incolla il codice seguente nella finestra del modulo.
VBA: suddividi i dati in fogli di lavoro in base al conteggio delle righe in Excel
Sub Splitdatabyrows()
'Updated by Extendoffice
Dim WorkRng As Range
Dim xRow As Range
Dim SplitRow As Integer
Dim xWs As Worksheet
Dim xTRg As Range
Dim xNTRg As Range
Dim xIER
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set xTRg = Application.InputBox("Please select the header row:", xTitleId, "", Type:=8)
If TypeName(xTRg) = "Nothing" Then Exit Sub
Set WorkRng = Application.InputBox("Please select the data range(exclude the header row):", xTitleId, WorkRng.Address, Type:=8)
If TypeName(WorkRng) = "Nothing" Then Exit Sub
SplitRow = Application.InputBox("Split Row Num", xTitleId, Type:=1)
If SplitRow = 0 Then Exit Sub
Set xWs = WorkRng.Parent
Set xRow = WorkRng.Rows(1)
xIER = WorkRng.Rows.Count
xIER = WorkRng.Row + xIER - 1
Application.ScreenUpdating = False
For i = 1 To WorkRng.Rows.Count Step SplitRow
resizeCount = SplitRow
If (xIER - xRow.Row + 1) < SplitRow Then
resizeCount = (xIER - xRow.Row + 1)
End If
xRow.Resize(resizeCount).Copy
Set xWs = Application.Worksheets.Add(after:=Application.Worksheets(Application.Worksheets.Count))
If xIER > (xRow.Row + SplitRow - 1) Then
xWs.Name = xRow.Row & " - " & (xRow.Row + SplitRow - 1)
ElseIf xIER = xRow.Row Then
xWs.Name = xRow.Row
Else
xWs.Name = xRow.Row & " - " & xIER
End If
Application.ActiveSheet.Range("A1").PasteSpecial
Set xNTRg = Application.ActiveSheet.Range("A1")
xTRg.Copy
xNTRg.Insert
Set xRow = xRow.Offset(SplitRow)
Next
Application.CutCopyMode = False
Application.ScreenUpdating = True
End Sub
3. Quindi, premere F5 chiave, nella finestra di dialogo visualizzata, seleziona la riga di intestazione, vedi screenshot:
4. Quindi, fare clic OKe nella seconda finestra di messaggio, seleziona l'intervallo di dati che desideri dividere per numero di righe, vedi screenshot:
5. Continua a fare clic OK pulsante, nella terza finestra di messaggio, inserisci il numero di righe in base alle quali desideri dividere, vedi screenshot:
6. Quindi, fare clic OK pulsante, i dati sono stati suddivisi in più fogli di lavoro in base al numero di righe, vedi screenshot:
Dividi i dati in più fogli di lavoro in base al conteggio delle righe con Kutools per Excel
Se ritieni che il codice VBA sia complesso, Kutools for Excel offre una soluzione rapida e intuitiva per affrontare in modo efficiente il problema della suddivisione dei dati. Questo Split Data La funzionalità semplifica il processo operativo, consentendo agli utenti di qualsiasi livello di competenza di dividere facilmente set di dati di grandi dimensioni in più fogli di lavoro senza la necessità di conoscenze di programmazione approfondite, facilitando una gestione efficace dei dati.
Se hai installato Kutools for Excel, si prega di fare come segue:
1. Seleziona l'intervallo di dati che desideri dividere, quindi fai clic su Kutools Plus > Split Data, vedi screenshot:
3. Nel Suddividi i dati in più fogli di lavoro la finestra di dialogo:
- Seleziona Righe fisse da Dividi in base a opzione e inserisci il numero di righe che desideri dividere per ciascun foglio di lavoro.
- Se i tuoi dati hanno intestazioni e desideri inserirle in ogni nuovo foglio di lavoro diviso, controlla I miei dati hanno intestazioni opzione. (Consiglio: puoi inserire il numero delle file del pastore in base ai tuoi dati.)
- Quindi puoi specificare i nomi dei fogli di lavoro divisi, sotto il file Nuovo nome dei fogli di lavoro sezione, seleziona le regole dei nomi dei fogli di lavoro dal file Regole elenco a discesa, è possibile aggiungere il file Prefisso or Suffisso anche per i nomi dei fogli.
4. Dopo aver specificato le impostazioni, quindi fare clic su OKe i dati selezionati sono stati suddivisi in più fogli di lavoro di una nuova cartella di lavoro ogni 5 righe. E le intestazioni vengono inserite per ogni nuovo foglio di lavoro. Vedi screenshot:
Articoli Correlati:
- Dividi i dati in più fogli di lavoro in base alla colonna
- Supponendo di avere un foglio di lavoro con enormi righe di dati e ora è necessario dividere i dati in più fogli di lavoro in base alla colonna Nome (vedere lo screenshot seguente) e i nomi vengono inseriti in modo casuale. Forse puoi prima ordinarli, quindi copiarli e incollarli uno per uno in altri nuovi fogli di lavoro. Ma questo richiederà la tua pazienza per copiare e incollare ripetutamente. Oggi parlerò di alcuni trucchi rapidi per risolvere questo compito.
- Combina righe duplicate e somma i valori in Excel
- In Excel, è uno scenario comune incontrare un set di dati con voci duplicate. Spesso potresti ritrovarti con una serie di dati in cui la sfida principale è combinare in modo efficiente queste righe duplicate sommando contemporaneamente i valori in una colonna corrispondente come mostrato nella seguente schermata. In questo contesto, approfondiremo diversi metodi pratici che possono aiutarti a consolidare i dati duplicati e ad aggregare i valori associati, migliorando sia la chiarezza che l'utilità delle cartelle di lavoro di Excel.
- Unisci due o più tabelle in una in base alle colonne chiave
- Supponendo che tu abbia tre tabelle in una cartella di lavoro, ora, vuoi unire queste tabelle in una tabella in base alle colonne chiave corrispondenti per ottenere il risultato come mostrato nell'immagine sottostante. Questo potrebbe essere un compito problematico per la maggior parte di noi, ma, per favore, non preoccuparti, in questo articolo introdurrò alcuni metodi per risolvere questo problema.
I migliori strumenti per la produttività in ufficio
Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo. Fai clic qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro
- 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 della stessa finestra, piuttosto che in nuove finestre.
- Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!
