XL 2010 Recherche et sélection de la plage

Romain31 · 15 Février 2023

Bonjour à tous,

Comment rechercher une ou plusieurs valeurs et sélectionner la plage (en réalité, la portion de ligne) la (ou les) contenant.
Les données se trouvent en colonne A
Il y a deux types de données, certaines commencent par 0- et d'autres sont du texte uniquement.
Le fichier joint montre l'exemple de cellules contenant un 0. La récupération se fait facilement avec "0-*".

J'aimerais avoir la même procédure pour récupérer uniquement les valeurs de type TEXTE avec la portion correspondante (en lignes 4 à 6).
Je joins un fichier en PJ

Auriez-vous quelques idées ?

Merci beaucoup et très bonne journée

fanch55 · 15 Février 2023

Bonjour,

VB:

Sub NotFind()
Dim LastCell As Range, Plage As Range
    Set LastCell = ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell)
    With Range("A1", LastCell)
        .AutoFilter ' pour enlever les filtres résiduels
        .AutoFilter Field:=1, Criteria1:="<>", Operator:=xlAnd, Criteria2:="<>0-**"
        Set Plage = Range("A2", LastCell).SpecialCells(xlCellTypeVisible)
        .AutoFilter ' pour enlever le filtre actif
    End With
    Plage.Select
End Sub

Romain31 · 15 Février 2023

Merci fanch55,
Ca fonctionne parfaitement.
J'avais tenté avec un filtre mais je l'avais mal paramétré.

Je me demandais aussi si on ne pouvait pas arriver au résultat par un tableau.
Quoiqu'il en soit, voici déjà une solution

XL 2010 Recherche et sélection de la plage

Romain31

XLDnaute Occasionnel

Pièces jointes

fanch55

XLDnaute Barbatruc

Romain31

XLDnaute Occasionnel

Discussions similaires