Discussion :

[stargates]

Bonjour,

Je voudrais faire une recherche sur toutes les feuilles du classeur

Pour cela l'utilisateur rentre dans une inputbox le n° de client
qui se situe dans la cellule "F5" de toutes les feuilles(une feuille par client)

je voudrais que cette recherche m'ouvre la feuille du client


une idée merci

[wilfried_42]

bonjour

Voici une macro

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
sub cherche()
      dim quoi as string, i as integer
      quoi = inputbox("Donner le n° client à chercher")
      if quoi = "" then exit sub
      for i = 1 to sheets.count ' Si test codes clients sont de l'apha (du texte)
          if sheets(i).range("F5").value = quoi then sheets(i).select ' Si test codes clients sont du numerique 
          if sheets(i).range("F5").value = val(quoi) then sheets(i).select
      next i
end sub

bon dimanche

[stargates]

super merci