XL 2010 Expression like

tontonexcel

XLDnaute Junior
Bonjour à tous,

Je fais des tests avec Like pour des chaines de caractères et j'ai un souci de formulation

Je voudrais extraire des noms dont la 1ère lettre est comprise entre A et Z sauf les lettres I et O

Cela me renvoie toujours vrai dans le test en PJ
Pouvez-vous m'aider ?
Merci
 

Fichiers joints

Lone-wolf

XLDnaute Barbatruc
Bonjour tontonexcel, Dranreb :)

VB:
Option Explicit

Sub modele_like()
Dim chaine As String
Dim test As Boolean
Dim cellule As Range
Dim temp As Variant
Dim x As Long

    chaine = "[I, O, i, o]*"
    x = Range("a" & Rows.Count).End(xlUp).Row

    For Each cellule In Range("a1:a" & x)
        test = cellule.Value Like chaine
        temp = test

        If test = False Then _
           cellule.Offset(0, 2).Value = cellule.Offset(0, 0).Value
    Next cellule

End Sub
 
Dernière édition:

Créez un compte ou connectez vous pour répondre

Vous devez être membre afin de pouvoir répondre ici

Créer un compte

Créez un compte Excel Downloads. C'est simple!

Connexion

Vous avez déjà un compte? Connectez vous ici.

Haut Bas