Comment remplir les numéros de séquence en ignorant les lignes masquées dans Excel ?
Supposons que vous ayez une plage de données filtrée et que vous souhaitiez remplir les cellules filtrées vides avec des numéros de séquence, comme le montre la capture d'écran suivante. Dans ce cas, faire glisser la poignée de remplissage ne remplira généralement pas correctement les cellules. Dans cet article, je vais parler de quelques astuces pour résoudre cette tâche dans Excel.
 |  |  |
Remplir les numéros de séquence en ignorant les lignes masquées avec une formule
Remplir les numéros de séquence en ignorant les lignes masquées avec du code VBA
Remplir les numéros de séquence en ignorant les lignes masquées avec Kutools pour Excel
Remplir les numéros de séquence en ignorant les lignes masquées avec une formule
Pour remplir les numéros de séquence uniquement dans les cellules visibles, une formule simple peut vous aider. Veuillez procéder comme suit :
1. Entrez cette formule : =SUBTOTAL(103;$B$3:$B3) (B3 est la cellule visible correspondant à la cellule où vous souhaitez commencer à remplir le numéro de séquence) dans la première cellule où vous voulez remplir les numéros de séquence, A3 dans cet exemple, puis appuyez sur la touche Entrée. Vous obtiendrez un nombre 1, voir capture d'écran :
2. Ensuite, sélectionnez la cellule A3 et faites glisser la poignée de remplissage vers le bas jusqu'aux cellules où vous souhaitez remplir les numéros de séquence, voir capture d'écran :
Remplir les numéros de séquence en ignorant les lignes masquées avec du code VBA
Le code VBA suivant peut également vous aider à remplir les numéros de séquence uniquement dans les cellules visibles. Veuillez procéder comme suit :
1. Maintenez les touches ALT + F11 enfoncées pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.
2. Cliquez sur Insertion > Module, puis collez le code suivant dans la fenêtre Module.
Code VBA : Remplir les numéros de séquence en ignorant les lignes masquées :
Sub FillValue()
'updateby Extendoffice
Dim xRg As Range
Dim xCell As Range
Dim xTxt As String
Dim xVal As Long
Dim I As Long
On Error Resume Next
xTxt = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select the data range", "Kutools for Excel", xTxt, , , , , 8)
Set xRg = xRg.SpecialCells(xlVisible)
Debug.Print xRg.Address
If xRg Is Nothing Then Exit Sub
For Each xCell In xRg
xVal = xVal + 1
xCell = xVal
Next
End Sub
3. Appuyez ensuite sur la touche F5 pour exécuter ce code, et une boîte de dialogue s'affiche pour vous rappeler de sélectionner la plage de données que vous souhaitez remplir, voir capture d'écran :
4. Cliquez ensuite sur le bouton OK, et les numéros de séquence ont été remplis uniquement dans les cellules visibles.
Remplir les numéros de séquence en ignorant les lignes masquées avec Kutools pour Excel
Les deux méthodes ci-dessus ne peuvent vous aider qu'à remplir les numéros de séquence dans les cellules visibles. Si vous souhaitez remplir une séquence comme AA-0001-BB, AA-0002-BB, AA-0003-BB…, les méthodes ci-dessus ne fonctionneront pas. Mais ne vous inquiétez pas, l'utilitaire Insérer un numéro de séquence de Kutools pour Excel peut vous aider à terminer cela rapidement et facilement.
Après avoir installé Kutools pour Excel, veuillez procéder comme suit :
1. Sélectionnez les cellules où vous souhaitez remplir les chaînes de séquence.
2. Cliquez sur Kutools > Insertion > Insérer un numéro de séquence. Dans la boîte de dialogue Insérer un numéro de séquence, cliquez sur le bouton Nouveau, voir captures d'écran :
 | |  |
3. Dans la boîte de dialogue élargie, spécifiez les paramètres dont vous avez besoin dans la section en bas à gauche. Pendant ce temps, vous pouvez prévisualiser la séquence dans le volet en bas à droite, voir capture d'écran :
4. Après avoir terminé les paramètres, cliquez sur le bouton Ajouter pour enregistrer ce nouvel élément dans la liste ci-dessus, voir capture d'écran :
6. Ensuite, sélectionnez l'élément que vous avez créé et cliquez sur le bouton Remplir la plage. Les chaînes de séquence ont été remplies uniquement dans les cellules visibles, voir capture d'écran :
Téléchargez et essayez gratuitement Kutools pour Excel maintenant !
Démo : Remplir les numéros de séquence en ignorant les lignes masquées avec Kutools pour Excel
Meilleurs outils de productivité pour Office
Améliorez vos compétences Excel avec Kutools pour Excel, et découvrez une efficacité incomparable. Kutools pour Excel propose plus de300 fonctionnalités avancées pour booster votre productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte l’interface par onglets à Office, simplifiant considérablement votre travail.
- Activez la modification 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é de50 % et réduit des centaines de clics de souris chaque jour !
Tous les modules complémentaires Kutools. Une seule installation
La suite Kutools for Office regroupe les modules complémentaires pour Excel, Word, Outlook & PowerPoint ainsi qu’Office Tab Pro, idéal pour les équipes travaillant sur plusieurs applications Office.
- Suite tout-en-un — modules complémentaires Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Un installateur, une licence — installation en quelques minutes (compatible MSI)
- Une synergie optimale — productivité accélérée sur l’ensemble des applications Office
- Essai complet30 jours — sans inscription, ni carte bancaire
- Meilleure valeur — économisez par rapport à l’achat d’add-ins individuels