Discussion :

[arthour973]

Bonjour à toutes et à tous,

Me voilà à nouveau avec un souci que je n'arrive pas à résoudre :

J'ai la macro suivante qui m'a été donné et que j'ai pu modifier avec un ami :
Code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Sub rechercher()
Dim rgZoneRecherche As Range, rgLastzoneCell As Range
  Set rgZoneRecherche = Sheets("Repondeurs").Range(ZoneRecherche)
  With rgZoneRecherche.Areas(rgZoneRecherche.Areas.Count)
    Set rgLastzoneCell = Cells(.Row + .Rows.Count - 1, .Column + .Columns.Count - 1)
  End With
  On Error Resume Next
  Set lastCell = rgZoneRecherche.Find(What:=Quoi, _
          After:=IIf(lastCell Is Nothing, rgLastzoneCell, lastCell), _
          LookIn:=IIf(Valeur, xlValues, xlFormulas), _
          LookAt:=IIf(Totalite, xlWhole, xlPart), _
          SearchOrder:=xlByColumns, SearchDirection:=xlNext, _
          MatchCase:=Casse, SearchFormat:=False)
  On Error GoTo 0
  Application.EnableEvents = False
  If Not lastCell Is Nothing Then
    lastCell.Select
Else
    Sheets("Repondeurs").Range(ZoneCliquer).Select
End If
  Application.EnableEvents = True
End Sub

Ce code fonctionne parfaitement mais quand je recherche une info (c'est un n° de tel) qui est dans une autre feuille, il n'y va pas !!!

Je pense que ce le code à modifier est le suivant :
Code :

Code :

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

Set rgZoneRecherche = Sheets("Repondeurs").Range(ZoneRecherche)

et qu'il faut peut-être remplacer "Repondeurs" par un truc qui lui indique "tout le classeur" mais je n'arrive pas à trouver.

Je joins un fichier test.

Merci pour votre aide précieuse,
Amicalement,
Lionel,

[clementmarcotte]

Bonjour,

As-tu vraiment besoin d'une macro ?

Quand tu ouvres la boîte de dialogue "Rechercher" d'Excel et que tu affiches les options, tu as le choix entre la feuille active ou tout le classeur.

[arthour973]

Bonjour,

As-tu vraiment besoin d'une macro ?

Quand tu ouvres la boîte de dialogue "Rechercher" d'Excel et que tu affiches les options, tu as le choix entre la feuille active ou tout le classeur.

Bonjour,
Merci de m'avoir répondu.
Pour des raisons de travail un peu complexes et longues à expliquer, OUI, j'ai besoin de cette macro qui est liée à d'autres fonctions.
Amicalement,
Lionel,