OVH Cloud OVH Cloud

faire une rherche en VBA

13 réponses
Avatar
RAOUX
Bonjour,

Je cherche a intgrer dans une procedure VBA :

Dans une feuille J'ai sur une colonne entre S17 et S116 qui represente des
Poids certaines cellules sont égale à 0 (c'est à dire non vide), je voudrai
conaitre la première cellule de cette colonne contenant 0 (c'est à dire les
coordonnées de la cellule ou plus exactement le N° de ligne)

Merci d'avance

Christian

3 réponses

1 2
Avatar
JB
http://cjoint.com/?ctvVmRYDDB

J'ai ajouté LookAt:=xlWhole.

Set x = [S17:S1116].Find(What:="0", LookIn:=xlValues, _
SearchOrder:=xlByRows, SearchDirection:=xlNext, LookAt:=xlWhole)
If Not x Is Nothing Then MsgBox x.Row

Pour des recherches dans des champs de taille importante, Find est +
rapide qu'une recherche séquentielle avec une boucle.

http://boisgontierj.free.fr/fichiers/jb-Find.zip


JB


On 19 fév, 21:35, RAOUX wrote:
Jb,
Dans ton fichier cela fonction bien mais ma liste comporte des chiffre
avec des 0 voirhttp://cjoint.com/?ctvAfjWejX
et la ça ne fonctionne pas il me donne 18
je cherche la 1ere ligne dont le poid et 0

christian


Avatar
RAOUX
merci JB

UNe question sans raport avec le reste
où peut on trouver de la documentation permetant d'arriver à de telle
fontions

et merci encore

christian

"JB" écrivait news:1171918260.206621.114020
@v33g2000cwv.googlegroups.com:

http://cjoint.com/?ctvVmRYDDB

J'ai ajouté LookAt:=xlWhole.

Set x = [S17:S1116].Find(What:="0", LookIn:=xlValues, _
SearchOrder:=xlByRows, SearchDirection:=xlNext, LookAt:=xlWhole)
If Not x Is Nothing Then MsgBox x.Row

Pour des recherches dans des champs de taille importante, Find est +
rapide qu'une recherche séquentielle avec une boucle.

http://boisgontierj.free.fr/fichiers/jb-Find.zip


JB


On 19 fév, 21:35, RAOUX wrote:
Jb,
Dans ton fichier cela fonction bien mais ma liste comporte des chiffre
avec des 0 voirhttp://cjoint.com/?ctvAfjWejX
et la ça ne fonctionne pas il me donne 18
je cherche la 1ere ligne dont le poid et 0

christian







Avatar
JB
Bonjour,

http://www.excelabo.net par exemple

JB
On 19 fév, 22:28, RAOUX wrote:
merci JB

UNe question sans raport avec le reste
où peut on trouver de la documentation permetant d'arriver à de telle
fontions

et merci encore

christian

"JB" écrivait news:1171918260.206621.114020
@v33g2000cwv.googlegroups.com:



http://cjoint.com/?ctvVmRYDDB

J'ai ajouté LookAt:=xlWhole.

Set x = [S17:S1116].Find(What:="0", LookIn:=xlValues, _
SearchOrder:=xlByRows, SearchDirection:=xlNext, LookAt:=xlWho le)
If Not x Is Nothing Then MsgBox x.Row

Pour des recherches dans des champs de taille importante, Find est +
rapide qu'une recherche séquentielle avec une boucle.

http://boisgontierj.free.fr/fichiers/jb-Find.zip

JB

On 19 fév, 21:35, RAOUX wrote:
Jb,
Dans ton fichier cela fonction bien mais ma liste comporte des chiffre
avec des 0 voirhttp://cjoint.com/?ctvAfjWejX
et la ça ne fonctionne pas il me donne 18
je cherche la 1ere ligne dont le poid et 0

christian- Masquer le texte des messages précédents -



- Afficher le texte des messages précédents -




1 2