Bonjour,

J'ai un fichier excel avec des valeurs dans la colonne A.
C'est valeurs sont des types de contrats: eau,assainissement ou autres.
Actuellement je vérifie la case A18 mais j'aimerais le faire pour toute la colonne A.
Pourriez vous m'aider s'il vous plaît...merci! et bonne journée

petit exemple de la colonne A:

contrat

a1 eau
a2 assainissement
a3 autres
a4 assainissement
....

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
Sub chaine_caract7()
 
    Dim Cible As String
    Dim i As Integer
 
    Cible = "eau,assainissement,autres"
 
    If InStr(Cible, Range("A18")) = 0 Then
 
        MsgBox "Non"
    Else
        MsgBox "Oui"
    End If
 
End Sub