Bonjour à tous,

Je suis bien calé en VBA mais là je sèche :

J'ai un classeur avec une macro qui fait un copier/coller d'une shape.
Je ne peux pas dans ma macro recréer cette forme trop complexe
J'aimerai enregistrer pourtant ce classeur en .xla pour l'avoir ensuite à chaque démarrage d'excel.

Comment alors dire :

Lorsque je clique sur le bouton, tu vas chercher la shape dans la feuille "bidule" du classeur "classeur.xla" ?

J'ai essayé ceci :

dans mon classeur "classeur.xla" voici la macro rattachée au menu
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
Sub afficherShape()
 
Dim fichierRetour, fichierAller As String
 
fichierRetour = ActiveWorkbook.Name 'classeur sur lequel je bosse
fichierAller = ThisWorkbook.Name 'classeur.xla
 
Windows(fichierAller).Activate
Sheets("feuil1").Select
ActiveSheet.Shapes.SelectAll
Selection.Copy
Windows(fichierRetour).Activate
Selection.Paste
Selection.Name = "Bidule"
End sub
Cette macro fonctionne lorsque mon fichier est en .xls mais ne fonctionne plus en .xla.

Il doit pourtant bien y avoir un moyen non ?

D'avance merci pour vos réponses,

Souri84