structurer un objet et ses relations

Bonjour

Petite demande d’information relative a comment structurer un objet et ses relations.
J’ai 3 classeurs ouvert classeur A – classeur B – classeur C composés chacun de 3 feuilles : pour classeur A (a1 a2 a3) Pour B classeur (b1 b2 b3)…
J’aimerai savoir comment je puis faire une recherche, par exemple, de la feuille b3 en étant positionné dans le classeur A,
Pour être plus claire je tape du code positionné dans un module du classeur A et j’aimerai appeler directement la feuil b3 sans passer par le classeur B , le code serait du type je suis sur Classeur A est ce que la feuille b3 existe ?, si oui activate.

Comment puis-je procéder ?

Merci d’avance

Bonjour.

Si tu connais le nom des classeurs, c'est très simple. Par exemple pour avoir une instance de la feuille b2, avec une procédure dans le projet du classeur A

Code:

---

1 2 3

Dim oSht as Excel.Worksheet   Set oSht = Application.Workbooks("NomDuClasseurB").Worksheets("NomDeLaFeuilleB2")

---

Ensuite tu peux utiliser toutes le propriétés et méthodes d'un objet WorkSheet en utilisant la variable oSht.

Si tu ne sais pas si la feuille existe, mais que tu connais le nom du classeur et celui de la feuille recherchée

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

Dim oWbk as Excel.Workbook, oSht as Excel.Worksheet   Set oWbk= Application.Workbooks("NomDuClasseurB")   for each oSht in oWbk.Worksheets if oSht.Name = "NomDeLaFeuilleB2" then exit for next oSht   if oSht is Nothing Then ...'la feuille n'existe pas Else ... 'la feuille existe End if

---

Cordialement,

PGZ

Merci pour ce retour, cela me clarifie bien les choses