High-Tech Santé Médecine Droit-Finances

Grippe A

Que dois-je faire ?

Rechercher : dans
Par :

Fonction cells.find problème de syntaxe

Dernière réponse le 8 jui 2009 à 18:01:19 Keufi, le 8 jui 2009 à 12:40:43 
 Signaler ce message aux modérateurs

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

Meilleures réponses pour « fonction cells.find problème de syntaxe » dans :
[Excel] Colorer des cellules sur conditions VoirIl existe dans Excel des fonctions très pratiques mais peu connues et peu utilisées. Exemple : vous souhaitez qu'une cellule se colore automatiquement en rouge (ou autre mise en forme de police, de bordure, de trame) selon une condition : un...
Vérifier le fonctionnement de son alimentation VoirOn peut tester le fonctionnement d'une alimentation en procédant comme ceci : Mettre l'alimentation sur OFF (derrière la tour). Débrancher celle-ci du secteur et de la carte mère (il est préférable de l'enlever entièrement de la tour en...
Différence entre dates avec la fonction DATEDIF VoirLa fonction DATEDIF n'est pas documentée dans Excel, mais par contre sur CCM vous pouvez trouver les possibilités offertes. En voici un résumé.   La syntaxe =DATEDIF(date début;date fin;type de calcul) date début : doit être une valeur date...
CD, CD audio et CD-ROM Voir
Javascript - Les fonctions VoirLa notion de fonction On appelle fonction un sous-programme qui permet d'effectuer un ensemble d'instructions par simple appel de la fonction dans le corps du programme principal. Cette notion de sous-programme est généralement appelée fonction...
Perl - Les fonctions VoirLa notion de fonction et de procédure On appelle procédure un sous-programme qui permet d'effectuer un ensemble d'instruction par simple appel de la procédure dans le corps du programme principal. Les procédure permettent d'exécuter dans plusieurs...
Posez votre question Répondre

1

Le Pingou, le 8 jui 2009 à 15:55:48

Bonjour,
Essayez la procédure qui suit ou: valeur cherchée en A1 (en feuille 3) dans la feuille [Feuil1]:
Sub cherchevaleur()
'
test = Range("A1") ' la valeur à chercher
For i = 1 To 256
nuli = Application.Match(test, Sheets("Feuil1").Columns(i), 0)
If Not IsError(nuli) Then
pos = "Feuil1 ! " & Sheets("Feuil1").Cells(nuli, i).Address
MsgBox ("Ma valeur est dans la cellule : " & pos)
Exit Sub
End If
Next i
End Sub
Salutations.
Jean-Pierre

   
Répondre à Le Pingou

2

Keufi, le 8 jui 2009 à 16:21:28

Merci!!

   
Répondre à Keufi

3

 Le Pingou, le 8 jui 2009 à 18:01:19

De rien.
Salutations.
Jean-Pierre

   
Répondre à Le Pingou
Posez votre question Répondre
Ils ont besoin de votre aide