Comment créer une liste à partir des mêmes cellules sur plusieurs feuilles dans Excel?
Supposons que nous déployions chaque table des ventes mensuelles dans une feuille de calcul séparée, comme illustré ci-dessous, et que toutes les tables de ventes ont la même disposition. Nous voulons maintenant créer une liste de toutes les valeurs de somme (cellule E6) sur plusieurs feuilles de calcul. Comment y parvenir? Et si créer une liste dynamique à partir des valeurs de somme de chaque feuille de calcul? Il y a deux façons pour vous:
Créer une liste à partir des mêmes cellules sur plusieurs feuilles avec VBA
Créez une liste dynamique à partir des mêmes cellules sur plusieurs feuilles avec Kutools for Excel
Créer une liste à partir des mêmes cellules sur plusieurs feuilles avec VBA
Avec le code VBA suivant, vous pouvez facilement créer une liste à partir des cellules spécifiées sur plusieurs feuilles de calcul. Vous pouvez faire comme suit:
Étape 1: Sélectionnez la cellule spécifiée à partir de laquelle vous allez créer votre liste. Dans notre cas, nous sélectionnons la cellule E6.
Étape 2: Presse autre + F11 simultanément pour ouvrir la fenêtre Microsoft Visual Basic pour Applications, cliquez sur insérer > Module, puis collez le code suivant dans la fenêtre du module.
VBA: créer une liste à partir des mêmes cellules sur plusieurs feuilles
Sub CreateList()
Dim xAddWs As Worksheet
Dim xWs As Worksheet
Dim RngAddress As String
xTitleId = "KutoolsforExcel"
RngAddress = Application.ActiveCell.Address
Set xAddWs = Application.ActiveWorkbook.Sheets.Add
xAddWs.Name = xTitleId
i = 1
For Each xWs In Application.ActiveWorkbook.Worksheets
If xWs.Name <> xTitleId Then
xAddWs.Cells(i, 1).Value = xWs.Range(RngAddress).Value
i = i + 1
End If
Next
End Sub
Étape 3: Presse F5 ou cliquez sur la Courir bouton pour exécuter ce VBA.
Ensuite, toutes les valeurs de la cellule spécifiée sur toutes les feuilles de calcul sont copiées dans une nouvelle feuille de calcul nommée KutoolsforExcel. Voir la capture d'écran :
Ce VBA remplira la liste dans une nouvelle feuille de calcul et les valeurs de la liste sont statiques, ce qui ne changera pas avec les valeurs d'origine.
Cependant, vous pouvez parfois vouloir remplir la liste dans la plage spécifiée et exiger que les valeurs de la liste correspondent toujours aux valeurs d'origine dans les cellules spécifiées tout le temps. Pour répondre à ces besoins, vous devez essayer la méthode suivante.
Créez une liste dynamique à partir des mêmes cellules sur plusieurs feuilles avec Kutools for Excel
Cette méthode introduira Kutools for Excel's Se référer dynamiquement aux feuilles de calcul utilitaire pour créer une liste dynamique à partir des mêmes cellules sur plusieurs feuilles de calcul.
Kutools for Excel - Emballé avec plus de 300 outils essentiels pour Excel. Profitez d'un essai GRATUIT complet de 30 jours sans carte de crédit requise ! Télécharger maintenant!
Étape 1: Sélectionnez la plage dans laquelle vous allez remplir la liste dynamique, puis cliquez sur le bouton Kutools > Plus > Se référer dynamiquement aux feuilles de calcul.
Étape 2: Dans la boîte de dialogue Ouvrir les références des feuilles de calcul,
(1) Cliquez sur le Remplir la commande et sélectionnez un type de remplissage dans la liste déroulante. Dans notre cas, nous sélectionnons Remplir verticalement cellule après cellule;
(2) Dans le Remplir la formule , spécifiez l'adresse de cellule à partir de laquelle vous allez créer une liste dynamique, puis cliquez sur le Verrouillage bouton (dans la fenêtre de contrôle qui apparaît maintenant) pour verrouiller la formule.
(3) Cliquez sur le Remplir la plage .
Vous verrez maintenant que les valeurs dans les cellules spécifiées sur toutes les feuilles de calcul sont remplies dans la plage spécifiée, comme illustré ci-dessous:
Lorsque les valeurs d'origine ont changé, les valeurs correspondantes dans cette liste spécifiée seront modifiées automatiquement.
Kutools for Excel - Boostez Excel avec plus de 300 outils essentiels. Profitez d'un essai GRATUIT complet de 30 jours sans carte de crédit requise ! Achetez-le Maintenant
Démonstration
Articles Liés:
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!