Discussion :

[Loki83]

Bonjour,

J'ai un fichier qui peut aller jusqu'à 8000 lignes. Il y a une colonne que l'on va appeler C dont je dois vérifier la valeur pour chaque ligne.
Cette colonne ne peut contenir qu'un nombre limité d'expression (environ 100 diférentes).

Je voudrai faire un programme en VBA pour vérifier si la valeur de chaque ligne de la colonne C est bien une des 100 possibles.

La seule idée que j'ai est de faire une boucle mais j'ai peur que cela soit lourd et prenne du temps...

Auriez vous des suggestions ?

Merci d'avance !!!

[Yoyo57]

Les 100 expressions se trouvent où ? Dans ta feuille ? Tu peux peut-être utiliser la propriété Find... Cela évite déjà la boucle pour les 100 valeurs possibles.

Reste la boucle des 8000 valeurs à supprimer...

[Loki83]

Pour le moment les 100 expressions se trouvent nulle part donc je suis flexible

Je connais pas du tout .find
Après une rapide recherche sur google, voila ce que je pense pouvoir faire.

Pour chaque valeur de la colonne C, je vais faire quelque chose du genre :

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 recherche()
Dim rngTrouve As Range
Dim strChaine As String
 
strChaine = InputBox("Chaîne à rechercher :")
Set rngTrouve = ActiveSheet.Columns(3).Cells.Find(what:=strChaine)
 
If rngTrouve Is Nothing Then
MsgBox "Pas trouvé"
Else
MsgBox rngTrouve.Address
End If
 
Set rngTrouve = Nothing
End Sub