XL 2010 charger macro

[titooooo]

bonjour

je cherche comment faire pour ajouter une feuille recherche avec le code en bas dans le code de cette feuille

alors j'aimerais charger cette page par macro lorsque je veut

mais je sais pas comment m'y prendre




Private Sub Worksheet_Change(ByVal Target As Range)
Dim MonTab, TabFin(), i As Long, x As Long, j As Byte

If Target.Address = "$A$1" Then
Range("C3").CurrentRegion.ClearContents
For Each sh In Worksheets
If sh.Name <> "Recherche" Then
MonTab = sh.Range("B2:F" & sh.Range("B" & Rows.Count).End(xlUp).Row)
For i = LBound(MonTab, 1) To UBound(MonTab, 1)
If MonTab(i, 2) = Target Or MonTab(i, 3) = Target Then
x = x + 1
ReDim Preserve TabFin(1 To 5, 1 To x)
TabFin(1, x) = CDbl(MonTab(i, 1))
For j = 2 To 5
TabFin(j, x) = MonTab(i, j)
Next
End If
Next
Erase MonTab
End If
Next
If x > 0 Then
Range("C3").Resize(UBound(TabFin, 2), UBound(TabFin, 1)) = Application.Transpose(TabFin)
Range("C3:G" & 2 + UBound(TabFin, 2)).Sort Key1:=Range("C4"), Order1:=xlDescending, Header:=xlGuess
End If
End If
End Sub

 

[Paf]

Bonjour,

pourquoi ne pas avoir continuer sur la discussion initiale ?
http://excel-downloads.com/threads/recherchev-plusieurs-classeur.20010744/

je cherche comment faire pour ajouter une feuille recherche avec le code en bas dans le code de cette feuille

Pas compris la demande, dans le classeur ( voir autre discussion) il y a déjà une feuille recherche !
Et le code en bas ?????

en PJ, le classeur avec la macro intégrée.

A+

 

[titooooo]

rebonjour Paf et le forum

bon ici c’est un peu différent je m'explique

le fichier Ce lien n'existe plusje le télécharge après chaque journée et il englobe plusieurs feuilles et beaucoup de données.

je veut que lorsque j'ouvre ce classeur ( qui ne contient pas la feuille recherche ni le code ) que excel crée en exécutant une macro automatique une nouvelle feuille recherche qui qui englobera le code de recherche

1-je telecharge mon fichier du net
2-je l'ouvre et j’exécute la macro
3-excel me crée une feuille recherche et lorsque je choisi une équipe son historique s'affiche

d'avance 1000 merci

 

[Paf]

re,

une solution un peu différente:

un classeur contient la feuille Recherche, la liste des équipes et la macro de recherche. En cliquant sur le bouton, le classeurs de résultat est ouvert, puis la feuille Recherche y est copiée avec la liste des équipes et la macro de recherche.

le chemin du classeur de résultat et son nom doivent être adaptés

A+

 

[Paf]

Re,

la solution proposée ne convient pas ?

 

[titooooo]

merci c bien ca ma demande bon week end