erreur d'execution 9 avec SheetsRésolu

Question

Bonjour 

Voila mon probleme ,vb6 me sort une erreur d'execution 9 :indice en dehors de la plage
 Je suis absolument certain que le nom de ma feuille est bonne,et pourtant il me sort l'erreur sur cette ligne,je ne comprend pas du tout 
Voila mon code: 

Set oExcel = CreateObject("Excel.Application")
oExcel.Visible = False
Set owk = oExcel.Workbooks.Open("C:\Program Files\Microsoft Visual Studio\VB98\projet\dossier xls ouvert\Sommaire dossier.xls")
Sheets("Feuil1").Select         'erreur sur cette ligne

If Vfeutest = "Non" Then
Rows(18).Delete
End If

owk.SaveAs "C:\Program Files\Microsoft Visual Studio\VB98\Client " & VnumeroClient & "\Sommaire dossier.xls"
owk.Close

Une aide serait la bienvenue 
merci d'avance : )

lutron · Accepted Answer

C'était trop rien en faite,une simple répetition d'un bout de  code qui me faisait tout planter.Ce qui explique pas mal de truc.....
Enfin ça ma fais perdre 2h00 ^^

Erreur d'execution 9 avec Sheets

1 réponse

Votre réponse