Bonjour,

Je suis à la fin du développement d'un nouveau projet perso et je bloc...

Voila je possède un tableau que je rempli par macro. Ce tableau me sert de base de donné. J'aimerais ensuite copier certaine ligne de ce tableau et venir les coller dans un autre tableau, d'une autre feuille.

Je souhaite choisire les lignes que je veut copier en fonction de la valeur de la première cellule de mon tableau.

Je pensais le faire avec une boucle For mais je n'arrive pas à la faire fonctionner.
Je me servais de cette boucle pour remplir une combobox en fonction d'une autre combobox avec l'aide d'un tableau.

Voici le code que j'essaye de modifier...

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
    Dim Cellule As Range
    ComboBox1.Clear
    For Each Cellule In Worksheets("Liste").Range("Tmaps").Columns(1).Cells
        If Cellule(1, 2) = ComboBox2.Value Then ComboBox1.AddItem Cellule.Value
    Next Cellule
End If
Je l'ai donc modifié afin d'essayer de voire si déjà j'arrivais à sélectionner les cellules...

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
    Dim Cellule As Range
    For Each Cellule In Worksheets("Base de donné").Range("basededonné").Columns(1).Cells
        If Cellule(1, 3) = ComboBox1.Value Then Range(ActiveCell, ActiveCell.End(xlToRight)).Select
        End If
    Next Cellule
mais ça ne fonctionne pas... j'essaye de cherche dans les forum mais je ne trouve pas...

Si quelqu'un peut m'aider merci...

Mentat