bonjourà tous,

je dois recopier à partir d'un fichier excel, F1, des plages de tableaux sur un autre fichier Excel, F2. Pour cela, je dois ouvrir les deux fichiers pour travailler dessus. Mais deja a cette étape, j'ai un pb. 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
 
Private Sub CommandButton1_Click()
Dim objWorkbookSource As Workbook
Dim objWorbookCible As Workbook
 
Set xlapp = New Excel.Application
 
objWorkbookSource = xlapp.Workbooks.Open("C:\Test\Test.xls")
objWorbookCible = xlapp.Workbooks.Add
 
objWorbookCible.Worksheets(2).Cells(1, 1) = objWorkbookSource.Worksheets(1).Cells(1, 1)
 
objWorkbookSource.Close
objWorbookCible.Close
 
End Sub
j'ai eu erreur dès "objWorkbookSource = xlapp.Workbooks.Open("C:\Test\Test.xls")", une erreur du type '91', variable objet non defini. Une idées, cela vien t il de "xlapp" ?
Merci pour votre aide