IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Comparaison insensible à la casse


Sujet :

Macros et VBA Excel

  1. #1
    Membre du Club
    Homme Profil pro
    Technicien réseau
    Inscrit en
    février 2015
    Messages
    77
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : Technicien réseau

    Informations forums :
    Inscription : février 2015
    Messages : 77
    Points : 54
    Points
    54
    Par défaut Comparaison insensible à la casse
    Bonjour,

    J'ai récupéré ce script mais il prend en compte la casse:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    Private Sub CommandButton1_Click()
    Sheets("Aide X3").Select
    End Sub
     
    Option Compare Text
     
    Private Sub TextBox1_Change()
     
        Application.ScreenUpdating = False
     
     Range("A3:O41").Interior.ColorIndex = xlNone
     
        If TextBox1 <> "" Then
            For ligne = 2 To 41
                If Cells(ligne, 3) Like "*" & TextBox1 & "*" Then
                    Cells(ligne, 3).Interior.ColorIndex = 3 'Exemple 1 (feuille)
     
                End If
            Next
        End If
     
    End Sub
    Quelle modification dois je faire pour qu'il ne respecte plus la casse?

  2. #2
    Expert éminent sénior


    Profil pro
    Inscrit en
    juin 2003
    Messages
    14 008
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : juin 2003
    Messages : 14 008
    Points : 20 029
    Points
    20 029
    Par défaut
    Bonjour,

    ajoute la ligne :

    tout en haut de ta page de code..

  3. #3
    Invité
    Invité(e)
    Par défaut
    bonjour,
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
      Instr( Cells(ligne, 3) , TextBox1 )<>0  Then

Discussions similaires

  1. Comparaison insensible à la casse ?
    Par ADK604 dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 05/02/2018, 12h34
  2. Comparaison de chaîne insensible à la casse
    Par oodini dans le forum C++
    Réponses: 9
    Dernier message: 26/03/2008, 11h13
  3. Comment effectuer une comparaison LIKE insensible à la casse ?
    Par Hervé Saladin dans le forum SQL Procédural
    Réponses: 6
    Dernier message: 20/10/2006, 13h36
  4. Recherche insensible à la casse ET insensible aux accents.
    Par Bernard Grosdoy dans le forum SQL Procédural
    Réponses: 1
    Dernier message: 10/07/2005, 04h32
  5. Tri insensible à la casse [IB7]
    Par patquoi dans le forum Débuter
    Réponses: 4
    Dernier message: 02/06/2003, 09h56

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo