[resolu] recherche + le suivant + ... voir autre message

recherche + le suivant + ... voir autre message [resolu] - VB/VBA/VBS - Programmation

Marsh Posté le 02-01-2006 à 21:48:15    

bonsoir, je voudrais connaitre dans une colonne selectionnée toutes les lignes où "machaine" apparaît; je voudrais faire avec la fonction find plus rapide qu une boucle systematique
 

Code :
  1. Sheets("FProg1" ).Activate
  2.     Columns("D:D" ).Select
  3.     Dim a As Range
  4.     Set a = Selection.Find(What:="machaine", After:=ActiveCell, LookIn:=xlValues, _
  5.     LookAt:=xlWhole, SearchOrder:=xlByColumns, SearchDirection:=xlNext, _
  6.     MatchCase:=True, SearchFormat:=False)
  7.     Do Until a Is Nothing
  8.         NUM_LIG_EN_PLUS = a.Row
  9.         Set a = Selection.FindNext(After:=ActiveCell)
  10.     Loop


 
ça ça marche pas, je reste sur mon premier trouvé ...


Message édité par bill751 le 02-01-2006 à 22:54:07
Reply

Marsh Posté le 02-01-2006 à 21:48:15   

Reply

Marsh Posté le 02-01-2006 à 22:14:43    

j ai trouvé, désolé, c est dans l aide excel

Reply

Marsh Posté le 02-01-2006 à 23:10:01    

J'adore ces messages qui disent que la personne a trouvé mais qui donnent pas la réponse aux autres...


---------------
Proverbe chinois: il vaut mieux apprendre à pêcher à un mendiant que de lui donner du poisson...
Reply

Marsh Posté le 02-01-2006 à 23:12:15    

oui je suis pas clair; regarde dans le sujet : je dis de voir mon autre message (la solution est dans l autre)

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed