Selection de données dans une colonne en VBA

Bonjour!

J'aurais besoin de votre aide pour un petite automatisation VBA. Le tout se passe dans le même classeur:

Il y a dans le 1er onglet des données dans une colonne (une association d'un nom avec un chiffre) qui peuvent se répéter plus d'une fois. Dans le même classeur se trouve aussi des onglets portant le même nom que ceux se trouvant dans la premiere colonne du premier onglet (je tiens à préciser que ces onglets existent déjà et sont déjà nommés). J'aimerais que VBA puisse recopier les données de la 2e colonne du premier onglet, dans le bon onglet mais sans répétition (ouf! ne vous inquietez pas, jai mis un exemple en piece jointe!). Aussi, j'aimerais que la macro fonctionne aussi si je décide de rajouter ou supprimer des items dans le premier onglet...

Ishhh... J'espère avoir été clair!

Merci de votre réponse éventuelle!!

23exemple2.xls (20.00 Ko)

Bonjour Mondapar,

Une solution :

Sub Recup()
    Dim FeuilDonnees As Worksheet
    Dim i As Long
    Dim cherche As Range
    Set FeuilDonnees = Sheets("Données")
    For i = 2 To Sheets.Count
        Set cherche = FeuilDonnees.Cells.Find(Sheets(i).Name, LookIn:=xlValues)
        If Not cherche Is Nothing Then
            Sheets(i).Range("E12").Value = cherche.Offset(, 1).Value
        Else
            Sheets(i).Range("E12").Value = ""
        End If
    Next i
End Sub

Ce code est adapté à la structure du fichier que tu as joint. En outre, il faut que les feuilles dont les noms se trouvent dans la feuille Données soient positionnées à partir de la 2è feuille.

Rechercher des sujets similaires à "selection donnees colonne vba"