no save
Assistance
Achat
News

Forum | Bureautique
fonction cells.find problème de syntaxe
Keufi, le mer. 08 juil. 2009 à 12:40:43
Bonjour,

Je débute en VBA et j'essaye de faire fonctionner un programme qui me permettrait,à partir de la valeur d'une cellule dans une certaine feuille, de localiser la cellule de même valeur dans une autre feuille.

J'ai essayé ca mais ca donne rien car je n'arrive pas à faire comprendre à excel qu'il faut aller dans une autre feuille pour prendre la valeur à rechercher:

Set cellules = Range(Selection, Selection.End(xlToRight))
longueur = cellules.Count
For i = 1 To longueur

range("W12").Select
Set kan = Selection.CurrentRegion
ActiveWorkbook.Names.Add Name:="kan", RefersTo:=Selection

Sheets("EURIBOR 3 mois").Select
Cells.Find(what:=kan, After:=ActiveCell, LookIn:=xlFormulas, LookAt:=xlPart, SearchOrder:=xlByColumns, SearchDirection:=xlNext, MatchCase:=False, SearchFormat:=False).Select
ActiveCell.Offset(0, 2).Copy
Sheets("Crédits CMB").Select
ActiveCell.Offset(1, 0).Select
ActiveSheet.Paste
ActiveCell.Offset(0, 1).Select

Next i

QQun pour m'aider svp???Configuration: Windows XP Internet Explorer 7.0


Le Pingou
08 juil.
Suivant
REPONSES
Le Pingou
08 juil.
Keufi
08 juil.
Le Pingou
08 juil.
Version Web
Réalisé par RedShift
no save