Recherche d'une cellule excel en minuscule

Résolu
christianm -  
 christianm -
Bonjour,


comment mettre en surbrillance une cellule excel dont le texte est écrit en minuscule.

Je veux le faire par le biais d'une boucle sous VB.

Merci d'avance

A voir également:

2 réponses

Réponse 1 / 2
lermite222 Messages postés 8724 Date d'inscription   Statut Contributeur Dernière intervention   1 191
 
Bonjour, 
Sub Colorer()
Dim Plage As Range
Dim Cel As Range
    Set Plage = Range("A1:C20") ' a adapter
    For Each Cel In Plage
        If Cel <> "" Then
            If Cel.Value = LCase(Cel.Value) Then Cel.Interior.ColorIndex = 6
        End If
    Next Cel
End Sub

A+
1
Réponse 2 / 2
christianm
 
je te remercie j'ai adapté ta procédure à mon programme et ça marche très bien
Merci de ton aide
0

Discussions similaires

Excel formule : savoir si une cellule contient partie texte
plunderer007 -
francois -

14 réponses
Remplir une cellule (texte) en fonction d'une autre (texte).
SOMUM -
SOMUM -

4 réponses