RECHERCHE CELL FIND

Fermé
noobduvb - 4 juin 2008 à 16:40
 noobduvb - 9 juin 2008 à 14:00
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

5 réponses

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
petit up ^^
merci
0
pas de brave personne pour m'aider ?
xD
0
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
!!
0