Recherche d'une valeur dans une plage de donnée

Signaler
Messages postés
9
Date d'inscription
dimanche 13 juin 2004
Statut
Membre
Dernière intervention
11 décembre 2007
-
Messages postés
45
Date d'inscription
mercredi 27 octobre 2004
Statut
Membre
Dernière intervention
26 août 2009
-
Je veux selectionner les valeurs de  F2 jusque G.22 et sur chaque valeur de la colonne F je veux tester si la cellule contient ":" par exemple " Insérer une valeur :"
Si le caractéres ":" est présent alors on va vérifier si dans la colonne G ( pour la meme ligne) si il y a le meme caractére ":".  On se fou de se qu'il y a d'écrit la seul chose qu'il importe c'est qu'il y est a chaque fois : dans les deux colonnes.
Si ya pas de : dans la colonne F alors yen a pas dans la colonne G.

Merci (c'est pour de la traduction multilingue merci).

2 réponses

Messages postés
6786
Date d'inscription
vendredi 16 décembre 2005
Statut
Membre
Dernière intervention
21 décembre 2011
18
Salut,

essai cette procédure :

<small> Coloration syntaxique automatique </small>
Sub Verification() 

' *** si la cellule F4 contient :, et pas G4, ces deux cellules seront en rouge

    Dim i As Byte 
    Dim Verif As Long, Verif2 As Long 

For i =  2 To 22 
    Verif =  InStr (1, CStr(Cells(i, 6).Value), ":") 
    If Verif <> 0 Then 
        Verif2  = InStr(1, CStr(Cells(i, 7).Value), ":") 
        If Verif2 = 0 Then Range("F" & i & ":G" & i).Select: Selection.Interior.ColorIndex = 3 
    End If 
Next i 

End Sub 

<small> Coloration syntaxique automatique</small>

@++

<hr size="2" width="100%" />
  --Mortalino--
Le mystérieux chevalier, "Provençal, le Gaulois"
<!--
Messages postés
45
Date d'inscription
mercredi 27 octobre 2004
Statut
Membre
Dernière intervention
26 août 2009

et donc tes données sont en format string, mais sortent d'où?


Présentes dans un tableau? Dans un Result Set?


Quel langage?