RECHERCHE CELL FIND

noobduvb -  
 noobduvb -
Bonjour,

tout le monde !!! c'est encore moi !! :)))
voilà j'ai fait une petite macro pour excel dans un fichier "light"
et ensuite la réintroduire dans le fichier de base ( plus lourd )

voilà mon petit probleme : dans mon code j'ai une petite fonction quie me permet de chercher une valeur par rapport à
à une zone de références ZR ( ZR qui est en commun dans mes 2 feuilles excel )
mais il peut arrivé dans certaine circonstances que mon ZR soit "vide"
ou que la valeur rechercher ne soit pas trouvé
dans ce cas là ma macro plante
je voudrais trouvé un moyen sous system de controle d'éviter ces erreurs
pouvez vous m'aider !!

merciiiiiii

voici mon code

 ZR = Worksheets("Charges techniciens").Cells(I, 11).Value
        ZR = Left(zr3, 2) ' permet de récupérer les 2 premiers caractére d'une cellule 
       
'recherche designation Tache
       Windows("Données .xls").Activate
       Worksheets("Feuill1").Activate
       Cells.Find(what:=ZR, After:=ActiveCell, LookIn:=xlValues, LookAt:=xlWhole, SearchOrder:=xlByColumns, SearchDirection:=xlNext, MatchCase:=False).Activate
       designtache = ActiveCell.Offset(0, 1).Value
       Windows("Suivil.xls").Activate
       Worksheets("Feuill1").Cells(I, 22).Value = designtache
A voir également:

5 réponses

noobduvb
 
re bonjours !
juste passais pour vous dire que j'ai essayé avec

Found = Cells.Find(what:=zr2, After:=ActiveCell, LookIn:=xlValues, LookAt:=xlWhole, SearchOrder:=xlByColumns, SearchDirection:=xlNext, MatchCase:=False).Activate
        Do While Found = False
        GoTo Suivant 'Saute ma recherche avec ZR2
        Loop


mais lorsque mon found est false je plante a ma 1er ligne donc je passe pas par mon do while

et jai essayé aussi avec un

On Error GoTo continue
*
*code
*

continue:
If Err.Number = 91 Then
GoTo Saute
End If

mais j'ai toujours dans c'est 2 cas un probleme

si quelqun peut m'aidé je suis là
merci
1
noobduvb
 
petit up ^^
merci
0
noobduvb
 
pas de brave personne pour m'aider ?
xD
0
noobduvb
 
sa séche didonc :)
j'ai entendu parlé du " set celluletrouvée=Cells.Find(what:=ZR ...
mais le probleme c'est que la cellule que je veus est à coté d'ou mon offset dans ma formule

quelqu'n pourrais m'aider ?

merciiiiiiiiiii
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
noobduvb
 
!!
0