Bonjour,

j ai un souci qui m embete bcp, j ai une fonction qui doit effectuer un recherche dans un autre classeur. je cherche tt d'abord a selectionner le critére dans mon premier classeur mais quand je souhaite activer la page adequate pour recuperer l info mon code plante et je ne comprend pas pourquoi.
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
23
Private Function recherche!(i As Variant, y As Variant)
 
Dim t
 
Dim MaBase As Excel.Workbook
Set MaBase = ActiveWorkbook
 
MaBase.Sheets("gescom").Activate   'plantage ici
 
cellRecherche = Cells(i, y).Value
MsgBox ("valeur  " & cellRecherche)
 
t = Cells.Find(What:=cellRecherche)
 
Dim Monclasseur As Excel.Workbook
Set Monclasseur = Workbooks.Open("T:\Sébastien R\extraction")
 
Monclasseur.Sheets("new").Activate
 
 
MsgBox ("fonction recherche " & t)
 
End Function
il faut savoir que je souhaite un ouvrir une page qui est dans le classeur actif.

si qq sait pk cela plante et comment activé la page que je souhaite ca le ferait bien.
merci d'avance.