Macro: manipuler des classeurs sans les ouvrir

J'ai pas pris ce pseudo pour rien :)

Je reprends:

en fait je travaille dans le classeur1, et j'aimerais extraire le contenu du classeur2 (feuilles, rangées de cellules, bref tout sont contenu) pour en déverser une partie dans le classeur1. Voilà. Et Bertrand Labévue est l'un des potes de Gaston Lagaffe :p

Re,

Si vraiment tu veux travailler avec un classeur fermé voir plein d'exemples ici : http://boisgontierjacques.free.fr/pages_site/ado.htm

C'est quand même plus simple de l'ouvrir...

eric

D'accord. Admettons que je vais le faire en ouvrant le classeur, je ne vais pas faire mon difficile ;). Par contre ensuite je voudrais copier une feuille du classeur2 pour la ranger telle quelle dans le classeur1... J'ai tenté des trucs, mais je pense que je ne comprends pas comment typer les variables correctement pour récupérer ma feuille d'un côté avant de la coller. En fait je n'arrive pas à lire certains trucs dans le code je pense (au sens de "je n'ai pas encore pigé la logique").

Par exemple, certains mots-clés comme thisWorkbook désignent toujours le classeur d'où part la macro ou celui qui est activé sur le moment:

là j'ai tenté ça :
Sub Fusion_Click()
If Not Application.Dialogs(xlDialogOpen).Show Then Exit Sub
Set Wbk2 = ActiveWorkbook
Set sheet1 = Wbk2.Worksheets("Courrier en retard")
ThisWorkbook.Activate
'la ligne ci-dessus ramène au classeur1
Sheets(sheet1).Copy After:=Sheets("Courrier Classé")

ça fonctionne jusqu'à la dernière ligne où il me sors une erreur de type... là vous m'avez déjà bien guidé mine de rien, mais malgré tout les tutos disponible y a encore trop de chose que je ne saisis pas dans la philo du typages de variable je pense...

Merci beaucoup !

Avec ça + l'enregistreur automatique de macro pour tester quelques idées, j'ai fini par obtenir un code qui fait ce que je veux sur ma question. (ça a beaucoup simplifié mon code aussi). Je note bien ce que tu dis sur les noms de variable. Il y a l'équivalent d'Oracle (Java...) pour recenser les types d'objet et les méthodes pour VBA ?

Sub Init_Fusion_Click()
If Not Application.Dialogs(xlDialogOpen).Show Then Exit Sub
Sheets("Courrier en retard").Copy After:=ThisWorkbook.Sheets("Courrier Classé")
End Sub

Cela dit, j'aimerais aussi que:
Si la feuille "Courrier en retard" existe déjà, elle soit juste actualisée plutôt qu'une deuxième soit crée.
Si la feuille "Courrier en retard" n'existe pas dans le classeur2, un message d'erreur s'affiche et la macro laisse tomber l'affaire.

C'est possible de faire ça facilement ?

Merci, à force de tâtonner j'ai utilisé une autre solution:

On Error Resume Next
For i = 1 To Worksheets.Count
If Worksheets(i).Name = "Courrier en retard" Then Sheets("Courrier en retard").Delete
Next i

je vais mettre ce sujet en résolu :)