Diviser les données en plusieurs feuilles de calcul par nombre de lignes dans Excel
Diviser efficacement une large plage de données en plusieurs feuilles de calcul Excel en fonction d'un nombre de lignes spécifique peut rationaliser la gestion des données. Par exemple, diviser un ensemble de données toutes les 5 lignes en plusieurs feuilles peut le rendre plus gérable et organisé. Ce guide propose deux méthodes pratiques pour accomplir cette tâche rapidement et facilement.
Diviser les données en plusieurs feuilles de calcul par nombre de lignes avec le code VBA
Divisez les données en plusieurs feuilles de calcul par nombre de lignes avec Kutools for Excel
Diviser les données en plusieurs feuilles de calcul par nombre de lignes avec le code VBA
Le code VBA suivant peut vous aider à diviser les lignes en plusieurs feuilles de calcul par nombre de lignes, procédez comme suit:
1. Maintenez le ALT + F11 clé pour ouvrir le Microsoft Visual Basic pour applications fenêtre.
2Cliquez sur insérer > Moduleet collez le code suivant dans la fenêtre Module.
VBA : diviser les données en feuilles de calcul par nombre de lignes dans 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. Puis appuyez F5 clé, dans la boîte de dialogue qui s'affiche, sélectionnez la ligne d'en-tête, voir capture d'écran:
4. Puis clique OK, et dans la deuxième boîte de dialogue, sélectionnez la plage de données que vous souhaitez diviser par nombre de lignes, voir capture d'écran:
5. Continuez à cliquer OK bouton, dans la troisième boîte de dialogue, entrez le nombre de lignes que vous souhaitez fractionner, voir capture d'écran:
6. Puis clique OK bouton, les données ont été divisées en plusieurs feuilles de calcul en fonction du nombre de lignes, voir capture d'écran :
Divisez les données en plusieurs feuilles de calcul par nombre de lignes avec Kutools for Excel
Si vous pensez que le code VBA est complexe, Kutools for Excel offre une solution rapide et intuitive pour résoudre efficacement le problème du fractionnement des données. Ce Diviser les données Cette fonctionnalité simplifie le processus opérationnel, permettant aux utilisateurs de tout niveau de compétence de diviser facilement de grands ensembles de données en plusieurs feuilles de calcul sans avoir besoin de connaissances approfondies en programmation, facilitant ainsi une gestion efficace des données.
Si vous avez installé Kutools for Excel, procédez comme suit:
1. Sélectionnez la plage de données que vous souhaitez diviser. Cliquez ensuite sur Kutools Plus > Diviser les données, voir capture d'écran:
3. Dans le Diviser les données en plusieurs feuilles de calcul boite de dialogue:
- Sélectionnez Lignes fixes de Fractionner basé sur et entrez le nombre de lignes que vous souhaitez diviser pour chaque feuille de calcul.
- Si vos données comportent des en-têtes et que vous souhaitez les insérer dans chaque nouvelle feuille de calcul fractionnée, veuillez vérifier Mes données ont des en-têtes option. (Conseil : vous pouvez saisir le nombre de rangées de bergers en fonction de vos données.)
- Ensuite, vous pouvez spécifier les noms de feuille de calcul fractionnés, sous le Nouveau nom de feuille de calcul , sélectionnez les règles de noms de feuille de calcul dans la Règles liste déroulante, vous pouvez ajouter le Préfixe or Suffixe pour les noms de feuille également.
4. Après avoir spécifié les paramètres, cliquez sur OKet les données sélectionnées ont été divisées en plusieurs feuilles de calcul d'un nouveau classeur toutes les 5 lignes. Et les en-têtes sont insérés pour chaque nouvelle feuille de calcul. Voir la capture d'écran:
Articles connexes:
- Diviser les données en plusieurs feuilles de calcul en fonction de la colonne
- Supposons que vous ayez une feuille de calcul avec d'énormes lignes de données et que vous deviez maintenant diviser les données en plusieurs feuilles de calcul en fonction de la colonne Nom (voir capture d'écran suivante) et que les noms soient saisis de manière aléatoire. Vous pouvez peut-être d'abord les trier, puis les copier et les coller un par un dans d'autres nouvelles feuilles de calcul. Mais cela nécessitera votre patience pour copier et coller à plusieurs reprises. Aujourd'hui, je vais parler de quelques astuces rapides pour résoudre cette tâche.
- Combinez des lignes en double et additionnez les valeurs dans Excel
- Dans Excel, il est courant de rencontrer un ensemble de données contenant des entrées en double. Souvent, vous pouvez vous retrouver avec une plage de données où le principal défi est de combiner efficacement ces lignes en double tout en résumant simultanément les valeurs dans une colonne correspondante, comme illustré ci-dessous. Dans ce contexte, nous examinerons plusieurs méthodes pratiques qui peuvent vous aider à consolider les données en double et à agréger leurs valeurs associées, améliorant ainsi à la fois la clarté et l'utilité de vos classeurs Excel.
- Fusionner deux ou plusieurs tables en une seule en fonction des colonnes clés
- En supposant que vous ayez trois tables dans un classeur, vous souhaitez maintenant fusionner ces tables en une seule table en fonction des colonnes clés correspondantes pour obtenir le résultat comme illustré ci-dessous. Cela peut être une tâche difficile pour la plupart d'entre nous, mais ne vous inquiétez pas, cet article, je vais vous présenter quelques méthodes pour résoudre ce problème.
Meilleurs outils de productivité bureautique
Améliorez vos compétences Excel avec Kutools for Excel et faites l'expérience d'une efficacité comme jamais auparavant. Kutools for Excel offre plus de 300 fonctionnalités avancées pour augmenter la productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte une interface à onglets à Office et facilite grandement votre travail
- Activer l'édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de 50% et réduit des centaines de clics de souris chaque jour!