Récupérer le nom d'un classeur d'un Range passé en paramètre Résolu

Question

Bonjour à toutes et à tous,

C'est la première fois que je poste sur ce forum, donc j'espère ne pas m'être trompé de catégorie !

J'ai recherché un peu partout, mais je n'ai rien trouvé (trop de mots dans la recherche).

Voilà, je vous expose mon problème :

Je crée une fonction VBA afin qu'elle soit utilisable dans Excel. Cette fonction est un peu du style "Recherchev".
Cette fonction prend 3 paramètres qui sont des "Range". Ces Ranges peuvent être dans d'autres classeurs ouverts.

Ma question est simple... mais pas évidente à solutionner (pour moi du moins) :
-> Comment, dans mon code VBA, puis-je trouver le nom du classeur de tel ou tel range passé en paramètre ?

Merci par avance pour vos réponses... et n'hésitez pas à me dire si vous voulez plus 
d'infos.

Samy.

Julien237 · Accepted Answer

Non, ca n'existe pas excuse moi, par contre ceci semble marcher :
Range.Parent.Parent.Name

Julien.

Renfield · Answer

tu as bien la propriété WorkSheet de ta variable Range....

Renfield
Admin CodeS-SourceS- MVP Visual Basic

Julien237 · Answer

Si c'est le classeur qu'il veut ca doit plutot être WorkBook
Essaye 
Range.Workbook.Name

Julien.

_samy_ · Answer

Merci Renfield. J'avais essayé, mais je n'ai pas réussi à monter jusqu'au classeur de Worksheet.

Merci Julien ! Ca marche parfaitement.

A bientôt.
Samy.

mortalino · Answer

Salut,

Julien237, ton premier code est effectivement bizarre !  ;)
Par contre, le second est parfait !

Pour expliquer à Samy,
le Parent sert à retrouver l'objet dont appartient Range (enfin, pour cet exemple) :
donc WorkSheet.
 le double Parent sert donc à retrouver l'objet de l'objet
(donc l'objet de WorkSheet --> WorkBook)

++

_samy_ · Answer

Merci Mortalino pour ces explications. J'avais bien vu que cette propriété existait, mais je n'ai même pas pensé à m'en servir.
Je pensais, vu que l'on pouvait avoir le "Range.Worksheet.Name", qu'on pouvait faire la même chose avec "Range.Worksheet.Workbook.Name"... du coup, je suis resté bloqué là dessus.

Encore merci à vous tous pour votre rapidité et votre aide.

A+
Samy.

jrivet · Answer

Salut,
_samy_: En suivant  ce que tu essayais, je pense que ceci devrait fonctionner aussi alors:
ObjRange.Worksheet.Parent.Name

@+,   Ju£i?n

Récupérer le nom d'un classeur d'un Range passé en paramètre

7 réponses

Votre réponse

Discussions similaires