Bonjour à tous,
Je souhaite copier une feuille d'un classeur (a) vers un autre classeur (b). Le code est dans le classeur (b) et refermer le classeur (b) après. J'ai cherché sur des forums mais je n'ai pas réussi. Pouvez-vous m'aider?
Voici mon code :
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
17
18
19
20
21
22
23 Dim MB52 As String Dim ZA02 As String MsgBox ("Sélectionner le fichier MB52") MB52 = Application.GetOpenFilename("") If MB52 <> "" Then MsgBox "Open " & MB52 Else: End End If MsgBox ("Sélectionner le fichier ZA02") ZA02 = Application.GetOpenFilename("") If ZA02 <> "" Then MsgBox "Open " & ZA02 Else: End End If Workbooks.Open MB52 Workbooks.Open ZA02
Partager