Selection multiple avec User Form

[Neptune64]

Bonjour à tous,

Avec le code ci-dessous: Dans la colonne C j'arrive à exporter toutes les lignes selon sélection EX: toutes les lignes qui ont le code 01 et qui ont le statut "Customer data".

j'aimerais pouvoir sélectionner plusieurs choix de la colonne C. Ex: toutes les lignes avec le code 01 et le code 03 (de la même colonne) et qui ont le statut "Customer data".

DLLCTPM = LCTPM.Range("C65536").End(xlUp).Row + 1
For p = 1 To DLLCTPM
If .Range("C" & p).Value = Me.LISTE_CODE.Value And Me.LISTE_STATUT.Value = "Customer Data" Then
                EX.Rows(DLEX + 1).Value = .Rows(p).Value
                DLEX = DLEX + 1

Merci pour votre aide

 

[Habitude]

Re : Selection multiple avec User Form

peut-etre comme ceci

DLLCTPM = LCTPM.Range("C65536").End(xlUp).Row + 1
For p = 1 To DLLCTPM
If (.Range("C" & p).Value = Me.LISTE_CODE.Value OR .Range("C" & p).Value= Me.LISTE_XXXX.Value) And Me.LISTE_STATUT.Value = "Customer Data" Then
                EX.Rows(DLEX + 1).Value = .Rows(p).Value
                DLEX = DLEX + 1

[/CODE]

 

[Neptune64]

Re : Selection multiple avec User Form

Hello !

ça fonctionnne comme je le désirais

Merci 🙂)))