|
Publicité | ||||||||||||||||||||||
|
|
#1 (permalink) |
|
Futur Membre du Club
![]() Date d'inscription: décembre 2004
Messages: 34
|
bonjour
j'utilise ce bout de code pour rechercher la chaine de caractères "GO EXCELLIUM" dans une feuille Code :
... Do Set c = .Find(what:="GO EXCELLIUM", After:=ActiveCell, LookIn:=xlFormulas _ , LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _ MatchCase:=False) If Not c Is Nothing Then ... |
|
|
|
|
|
#2 (permalink) |
|
Membre chevronné
![]() Date d'inscription: juin 2008
Localisation: Pas loin de Versailles !
Âge: 24
Messages: 617
|
Salut,
Tu peux faire 2 .Find imbriqués ou passer par des boucles For. En gros : Code :
For i = 1 to 10 If Range("A"&i) = "TRUC" AND Range("B"&i) = "MUCHE" Then 'Ce que tu veux faire End if Next
__________________
DeaD |
|
|
|
|
|
#3 (permalink) | |
|
Futur Membre du Club
![]() Date d'inscription: décembre 2004
Messages: 34
|
merci de ta réponse
le For , j'ai pas trop envie de l'utiliser. Quand on compare le temps de traitement entre un For et un .find, y a pas photo... je pensais qu'il y avait moyen de passer plusieurs parametres de recherche via un seul .find Citation:
il va donc falloir que je fasse 5 recherches imbriquées avec chaque carburant |
|
|
|
|
|
|
#4 (permalink) |
|
Expert Confirmé
![]() Date d'inscription: juillet 2008
Localisation: Elsass
Âge: 24
Messages: 1 887
|
Pas 5 recherche imbrique mais 5 recherche a la suite si c'est un or
D'abord tous les "GO EXCELLIUM" puis les "GO PREMIER" puis les "SP95 E10" puis .... tu peux le faire avec un seul find et une boucle sur un tableau Code :
Dim i As Integer Dim tableau(1 To 5) As String tableau(1) = "GO EXCELLIUM" tableau(2) = "GO PREMIER" tableau(3) = "SP95 E10" tableau(4) = "SUPER SP 98" tableau(5) = "SUPER SP 95" For i = 1 To 5 Do Set c = .Find(tableau(i)) If Not c Is Nothing Then ...... Next i End Sub |
|
|
|
|
|
![]() |
||
.find avec plusieurs critères
|
||
| Outils de la discussion | |
|
|