Passer au contenu principal

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:

doc créer liste plusieurs feuilles 1

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

Combinez facilement plusieurs feuilles de calcul / classeurs dans une seule feuille de calcul / classeur

Il peut être fastidieux de combiner des dizaines de feuilles provenant de différents classeurs en une seule. Mais avec Kutools pour Excel Combiner (feuilles de calcul et classeurs) utilitaire, vous pouvez le faire en quelques clics!

ad combiner feuilles livres 1


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 :

doc créer liste plusieurs feuilles 2

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.


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.

doc renvoyer dynamiquement aux feuilles 1

Étape 2: Dans la boîte de dialogue Ouvrir les références des feuilles de calcul,

doc créer liste plusieurs feuilles 5

(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 Bloquer 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


Kutools for Excel: Plus de 300 outils pratiques à portée de main ! Commencez dès aujourd’hui votre essai gratuit de 30 jours sans limitation de fonctionnalités. Télécharger maintenant!

Meilleurs outils de productivité bureautique

Caractéristiques populaires: Rechercher, mettre en évidence ou identifier les doublons   |  Supprimer les lignes vides   |  Combinez des colonnes ou des cellules sans perdre de données   |   Tour sans formule 
Super recherche: VSearchup à critères multiples    VSearch à valeurs multiples  |   Recherche virtuelle sur plusieurs feuilles   |   Recherche floue ....
Liste déroulante avancée: Créez rapidement une liste déroulante   |  Liste déroulante dépendante   |  Liste déroulante à sélection multiple ....
Gestionnaire de colonnes: Ajouter un nombre spécifique de colonnes  |  Déplacer les colonnes  |  Basculer l'état de visibilité des colonnes masquées  |  Comparer les plages et les colonnes 
Caractéristiques en vedette: Mise au point de la grille   |  Voir Design   |   Grande barre de formule    Gestionnaire de classeurs et de feuilles   |  Centre de ressources (Texte automatique)   |  Sélecteur de date   |  Combiner des feuilles de travail   |  Crypter/déchiffrer les cellules    Envoyer des e-mails par liste   |  Super filtre   |   Filtre spécial (filtre gras/italique/barré...) ...
Les 15 meilleurs ensembles d'outils12 Texte Outils (Ajouter du texte, Supprimer les caractères, ...)   |   50+ Graphique Types (Diagramme de Gantt, ...)   |   40+ Pratique Formules (Calculer l'âge en fonction de l'anniversaire, ...)   |   19 Insertion Outils (Insérer le code QR, Insérer une image à partir du chemin, ...)   |   12 Conversion Outils (Nombres en mots, Conversion des devises, ...)   |   7 Fusionner et fractionner Outils (Lignes de combinaison avancées, Cellules divisés, ...)   |   ... et plus

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...

onglet kte 201905


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!
Comments (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Very helpful bit of coding, saved hours of work creating a table from lots of separate data worksheets
This comment was minimized by the moderator on the site
Thank you very much for this. Just saved me hours of work as I had to go through 200 sheets doing data input... One thing to note for people is to click the cell you want it to use prior to opening ip and running the macro. Scratched my head for a couple minutes as the worksheet was opening up but didn't know why the information wasn't showing
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations