Récupérer les données d'une colonne présente dans différents onglets
Bonjour à tous,
Ceci est mon premier post, ma première question.
Je ne suis vraiment pas douée avec Excel mais je pense qu'avec votre aide, je ne pourrais que m'améliorer.
Voici mon besoin :
J'ai un tableau dans lequel il y a environ 16 onglets.
Chacun des onglet est construit de la même manière.
Ils ont 5 colonnes, toutes nommées pareil.
Les onglets peuvent contenir jusqu'à 3000 lignes.
Je souhaiterais pouvoir récupérer les données contenues dans la dernière colonne de chaque onglet pour les mettre dans un autre tableau (synthèse) tout en supprimant les doublons.
Je ne sais pas si je suis très claire....
Merci à vous.
Bonjour FJSINFO,
Oui c'est possible mais un fichier exemple serait utile afin d'avoir une base de travail.
Merci pour la réponse.
Comme demandé, voici un exemple de fichier.
Du coup, je voudrais pouvoir reporter dans une colonne d'un autre tableau toutes les données des colonnes E. Sachant que certaines des cellules peuvent éventuellement être identiques, je voudrais que le doublons soient automatiquement supprimés...
Merci
Merci beaucoup Florian,
Pourrais-tu me noter la méthode, le code utilisé et me mettre en commentaire ce que signifie chaque ligne stp?
Le but étant pour moi d'apprendre et de pouvoir adapter ta solution à mon contexte.
Merci d'avance.
Voici l'explication:
Sub Extract_données()
"Déclaration des variables
Dim x As Long
Dim Dico As New Scripting.Dictionary
' Boucle sur toutes les feuilles sauf la feuille "Recap"
For x = 1 To ThisWorkbook.Sheets.Count
If Sheets(x).Name <> "Recap" Then
Sheets(x).Select
'Calcul de la derniere ligne de la feuille Sheets(x).Name
derlgn = Cells(Rows.Count, 5).End(xlUp).Row
' Boucle sur toutes les cellules de la plage de E2 à E & derlgn
For Each c In Range("E2:E" & derlgn)
'Ajout de la valeur dans le dico
Dico(c.Value) = c.Value
Next c
End If
Next x
'Recopie du Dico dans la Feuile "Recap"
Sheets("Recap").[A1].Resize(Dico.Count) = Application.Transpose(Dico.Keys)
Sheets("recap").Select
End SubMerci Florian.
Il s'agit de code VBA c'est bien ça?
Je vais essayer ça. Et surtout essayer de l'adapter à mon contexte!!!
Un grand merci. Et à très vite pour d'autres questions!!!
Question bête,
Comment tu créer le bouton et insère le code qui va bien?
Pour insérer un control je te laisse lire cette procédure :