Macro pour recherche d'un element dans un tableau

bonjour,

j'ai créer une macro qui cherche un numéro de dossier puis affiches les caractéristique de ce dossier dans une fenêtre ( comme une IHM)

au début j'ai fais un programme pour chercher ce numéro de dossier et puis dire a l'utilisateur ou existe ce dossier, mais quand j'execute la macro il m'affiche toujours "dossier n'existe pas" avez vous des idéeS?

voici ma macro:

Sub Toto()

Dim i, x as Long

Dim dossier as Variant

dossier=InputBox (""veuillez saisi le numero de dossier a chercher")

x = cells (2,3).End(XlDown).Row

For i = 1 to x

If Cells (i,3).Value = dossier Then MsgBox ("dossier trouvée en C" & i)

Else MsgBox ("numéro non trouvé")

Next i

Exit For

End Sub

Bonjour

A tester (permet d'avoir des numéros composés exclusivement avec des chiffres)

Sub Toto()
Dim i As Long, x As Long
Dim dossier As Variant

  dossier = InputBox("veuillez saisi le numero de dossier a chercher")
  x = Cells(2, 3).End(xlDown).Row

  For i = 1 To x
    If CStr(Cells(i, 3).Value) = dossier Then
      MsgBox "dossier trouvée en C" & i
      Exit Sub
    End If
  Next i

  MsgBox "numéro non trouvé"
End Sub

Bonjour,

finalement ça marchait..

merci

Rechercher des sujets similaires à "macro recherche element tableau"