Ouverture de fichier excel sous vba

bierataise Messages postés 55 Date d'inscription mardi 28 juin 2005 Statut Membre Dernière intervention 4 mai 2006 - 16 août 2005 à 10:37
Paladin2107 Messages postés 154 Date d'inscription samedi 25 octobre 2003 Statut Membre Dernière intervention 5 septembre 2008 - 16 août 2005 à 10:52
Cela fait une semaine que je galère sur l'ouverture d'un fichier,j'ai tout essayer et je ne sais plus quoi faire à chaque fois il me dit fichier introuvable alors que ce fichier j'arrive à l'ouvrir "manuellement"donc il existe.
J'ai essayé avec shell mais aussi avec workbooks.open et aucune des deux méthodes ne fonctionne.
Si qq1 connait une autre méthode qu'il me l'a donne car l'a vraiment je ne vois pas et cela m'empèche d'avancer sachant qu'il me reste plus que dix jours pour boucler ce projet.
Merci d'avance

2 réponses

Paladin2107 Messages postés 154 Date d'inscription samedi 25 octobre 2003 Statut Membre Dernière intervention 5 septembre 2008 1
16 août 2005 à 10:46
Dim xlApp As Excel.Application
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet

Set xlApp = New Excel.Application
Set xlBook = xlApp.Workbooks.Open(App.Path & "\test.xls")
Set xlSheet = xlBook.Worksheets("feuil1")

Couscous
0
Paladin2107 Messages postés 154 Date d'inscription samedi 25 octobre 2003 Statut Membre Dernière intervention 5 septembre 2008 1
16 août 2005 à 10:52
Workbooks.open Filename : = Workbooks("monclasseur.xls").path & "\monclasseur2.xls"

Workbooks("monclasseur2.xls").activate

Couscous
0
Rejoignez-nous