[ VBS + Excel ] Erreur " Indice en dehors de la plage "
Bonjour,
Je cherche à piloter un document Excel via un script VBS.
Code:
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 |
Or une erreur apparaît lors de l'exécution de la ligne 15 : " Set objWorksheet2 = objExcel.Worksheets("Test") "
Indice en dehors de la plage
Pouvez-vous me donner un indice afin de me sortir de cette impasse ?
Respectueusement,
Aïda Daoudi
