[VB.NET] Ajouter feuille à un document Excel
Bonjour,
je réalise un export excel vers plusieurs feuilles quand j'arrive à la 4ème feuille ca plante car dans une document ecel, il n'y a que trois feuilles par défaut. J'ai essayé d'ajouter des feuilles supplémentaires à mon fichier mais ca ne fonctionne pas :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
|
Dim xsFRANCE As New Excel.Worksheet
Dim xsUK As New Excel.Worksheet
Dim xsCZECH As New Excel.Worksheet
'xlBook.Sheets.Add(xsFRANCE)
'xlBook.Sheets.Add(xsUK)
'xlBook.Sheets.Add(xsCZECH)
xsFRANCE = CType(xlBook.Worksheets(i), Excel.Worksheet)
xsUK = CType(xlBook.Worksheets(i + 1), Excel.Worksheet)
xsCZECH = CType(xlBook.Worksheets(i + 2), Excel.Worksheet) |
Ce code est dans une boucle, au départ i = 1, là ca marche, mais dans la deuxieme boucle i = 4
Quand j'enleve les commentaires ca ne fonctionne pas, quel est le code qui permets de rajouter des feuilles dans un document excel ???
Merci.
