Bonjour,
Je cherche à piloter un document Excel via un script VBS.
Or une erreur apparaît lors de l'exécution de la ligne 15 : " Set objWorksheet2 = objExcel.Worksheets("Test") "
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 Mois= Month(DateValue(Now)) Jour=Day(DateValue(Now)) Annee=Year(DateValue(Now)) 'Formatage de la date et de l'heure Date_Maintenant = date Date_Maintenant = day(Date_Maintenant) & month(Date_Maintenant) & year(Date_Maintenant) Set objExcel = CreateObject("Excel.Application") Set objWorkbook = objExcel.Workbooks.Open("C:\Users\Orsenna\Desktop\PROJET_BP\Test.xlsx") objExcel.visible = false objExcel.Application.DisplayAlerts = False objExcel.Cells(2, 1).Value= 3 objExcel.Cells(2, 2).Value= 4 objExcel.Cells(2, 3).Value= 3 Set objWorksheet = objExcel.Worksheets("Feuil2") Set objWorksheet2 = objExcel.Worksheets("Test") objWorksheet.Cells(2,1).Value=60 objWorksheet.Cells(2,1).Value=8 objExcel.ActiveWorkbook.Save objExcel.ActiveWorkbook.Close ObjExcel.Application.Quit
Indice en dehors de la plage
Pouvez-vous me donner un indice afin de me sortir de cette impasse ?
Respectueusement,
Aïda Daoudi
Partager