Ouvrir les lignes d'un tableau Excel dans de nouveaux onglets
Comment filtrer et copier les lignes d'un tableau Excel afin d'ouvrir un nouvel onglet pour chaque ligne ?
Dans ce tutoriel, je vous explique comment filtrer et copier les lignes d'un tableau Excel, afin d'ouvrir un nouvel onglet pour chaque ligne de votre tableau.
Selon vos besoins, vous allez pouvoir :
🠞 sélectionner uniquement les lignes que vous souhaitez filtrer et copier, sur de nouvelles feuilles de calcul
OU
🠞 filtrer et copier toutes les lignes de votre tableau, vers de nouvelles feuilles de calcul en une seule fois.
Pour vous entraîner à filtrer et copier les lignes d'un tableau Excel, vers de nouvelles feuilles de calcul :
-> Télécharger le fichier Excel de la vidéo.
Voir la vidéo pour suivre les différentes étapes
📌↪️ Code VBA à utiliser :
(✍️ n'oubliez pas de modifier le code comme expliqué dans la vidéo)
Sub Ouvrir_Onglet()
Dim r As Integer, NOMS As String, ws As Worksheet
Set ws = ActiveSheet
ws.Range("A1:D1").AutoFilter
r = 1
Do
r = r + 1
NOMS = ws.Range("A" & r).Value
On Error Resume Next
If Sheets(NOMS) Is Nothing Then
ws.Range("A1:D1").AutoFilter Field:=1, Criteria1:=NOMS
ws.Range("A1").CurrentRegion.SpecialCells(xlCellTypeVisible).Copy
Sheets.Add.Name = NOMS
Sheets(NOMS).Paste
ws.ShowAllData
End If
Loop While ws.Range("A" & r + 1).Value <> ""
End Sub
Un autre tutoriel qui pourrait vous intéresser :
👍Ce qui est bien utile pour envoyer des mails à plusieurs destinataires en une seule fois.