[vba-e] Rendre Une Feuille Active

Voici mon problème :
J'ai une image dans un fichier Excel (fichier 1).
Jai un deuxième fichier avec un controle image (fichier2).
J'aimerais automatiquement (avec du code VBA car c'est une action réitéré plein de fois <=> les fichiers changent) coller l'image du fichier 1 dans le controle "image" du fichier2!
J'ai créé du code qui fonctionne bien. Seulement, il ne trouve pas le controle "image" du fichier2 car il cherche sur le fichier 1 : le fichier actif (car ouvert nécessairement le premier).
Comment rendre la feuille 1 du fichier2 active?

Code:

---

Wokbooks("Fichier2.xls).activate

---

Ca ne marche pas car mon nom de fichier c'est un paramètre f2 :

Code:

---

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

J'ouvre mon fichier ou il y a le controle image app2.Workbooks.Open "G:\PROJET\Fertiliseurs\Modele.xls" Set classeur2 = app2.Workbooks.Item(1) Set f2 = classeur2.Worksheets.Item(1)   J'ouvre le fichier ou il y a l'image Set app1 = CreateObject("excel.application") app1.Workbooks.Open "G:\PROJET\" & Nom & ".xls" Set classeur1 = app1.Workbooks.Item(1) Set f1 = classeur1.Worksheets.Item(2) Je prend l'image Set S = f1.Shapes.Item("Image 24")   J'active la feuille ou il y a le controle image NE MARCHE PAS f2.Activate

---

Code:

---

f2.activate

---

c'est que j'ai mis mais ca marche pas!:cry:

Autant pour moi, je n'avais pas vu app2.
C'est quoi app2 ?

app2 est l'application excel correspondant au fichier2
classeur2 est le classeur correspondant au fichier2
f2 est la feuille 1 du fichier2

Bon. Si tu es dans Excel, tu n'as pas besoin d'instancier l'objet Application. Car je suppose que app2 est l'instance de l'appli.
Ce que je mettrais

Code:

---

1 2 3 4 5 6

Set Cl1 = ActiveWorkbook 'le classeur actif ou Set Cl1 = Thisworkbook 'Le classeur contenant cette macro (pas forcément actif) Workbooks.Open "G:\PROJET\Fertiliseurs\Modele.xls" Set cl2 = ActiveWorkbook 'Tu viens de l'ouvrir, il est actif Set f2 = cl2.Worksheets("NomDeLaFeuille")

---

Bravo! La feuille voulu est bien active mais le problème c'est qu'il trouve pas le controle image sur la feuille active! Serait tu pourquoi?