créer une fonction "entre classeur"

[krystof_ii]

Bonjour à tous,
n'ayant eu réponse à mon précédent post :
https://www.excel-downloads.com/thr...-valeur-dun-filtre-dun-autre-classeur.130989/
J'imagine avoir mal formulé ma question. J'essaie à nouveau.

je souhaiterais dans une fonction VBA pouvoir consulter une valeur dans une autre feuille (et pas forcément du meme classeur).
Cette relation est créée grace à l'appel d'une variable range.
Ma question est comment "lire" & "utiliser" le nom du classeur / fichier dans la variable range.

La fonction marche très bien lorsque l'on est dans le meme fichier mais je n'arrive pas à "le sortir" du classeur.

Ci-dessous le bout de début du code :

Function Val_Filtres(Emplacement_filtre As Range) As String
'Feuille -> la feuille du filtre à étudier
'Emplacement_filtre -> premiere cellule du filtre actif
Dim CritFiltres As String
Dim N_ligne_du_filtre, N_colonne_du_filtre As String
Dim c, i As Byte
Dim CoupureDate As Integer
Application.Volatile
Val_Filtres = ""
CritFiltres = ""
'N_Ligne_du_Filtre -> N° de la ligne surlaquelle le filtre est activé
N_ligne_du_filtre = Emplacement_filtre.Row
'N_colonne_du_Filtre -> N° de la colonne surlaquelle le filtre est activé
N_colonne_du_filtre = Emplacement_filtre.Column
With Sheets(Emplacement_filtre.Worksheet.Name).AutoFilter

Egalement en fichier joint un classeur avec la fonction VBA

par avance Merci,

 

[JNP]

Re : créer une fonction "entre classeur"

Bonjour Krystof_ii 🙂,
Totalement inutile d'ouvrir un nouveau post, il eut été plus judicieux de faire un Up du premier en ajoutant tes explications complémentaires 😱!
J'ai testé ton fichier (dont la fonction ne répond pas toujours, mais je suis en 2007 et les filtres ne réagissent pas de la même manière, vu qu'ils sont multicritères) et en utilisant

=val_filtres('[Test publipostage.xls]Feuil1'!$A$1)

je récupère bien la valeur du filtre du 2ème fichier. Où est ton problème ?
Bon dimanche 😎

 

[krystof_ii]

Re : créer une fonction "entre classeur"

Désolé ...😱

doublement désolé ...😱😱

1° la prochaine fois, je ferai un up du fil ; promis

2° effectivement, la lecture du filtre fonctionne d'un fichier sur l'autre.
En fait c'est parcequ'en le testant je n'avais pas changé la valeur du filtre.

Par contre je suis en 2002 et tu m'indiques que pour 2007, il y aurait des modifs à appliquer ...

Merci JP

 

[JNP]

Re : créer une fonction "entre classeur"

Re 🙂,
En 2007, le filtre peut être, par exemple, 01/01/09 OU 01/02/09, ce que ne permet pas les versions antérieures, donc la fonction se traduit par #VALEUR...
Pour améliorer ta fonction, une seule solution, la tester en 2007 😛...
Bon courage 😎

 

[krystof_ii]

Re : créer une fonction "entre classeur"

J'y travaillerai (en janvier) et si je trouve solution, je la mettrai à disposition sur le forum ...

Encore merci