ouvrir un fichier xlsRésolu

Question

Bonjour à tous,

alors voilà je souhaite ouvrir à partir d'un powerpoint un fichier excel.
j'ai donc dans le diaporama fais un lien hypertext qui fonctionne très bon.
j'utilise à plusieur reprise sur mes diapos le même fichier mais je voudrais que selon la diapo il me l'ouvre sur une feuille différente. (ex, liens n° 1 m'ouvrirai le fichier trucmuche.xls feuil1, et le liens n°2 toujours avec le fichier trucmuche.xls mais sur la feuil2)

bon j'ai essayé autre chose.
sur le visual basic de powerpoint j'ai crée des labels ou lorsque je dessus je fait le code suivant:

Public Sub Label1_Click()
Open "test.xls" For Input As #1


End Sub

mais il ne m'ouvre rien et en plus je ne gère pas la feuille voulue à l'ouverture.

si qlq'un a solution je lui en serais très reconnaissant.
merci






Achi

mortalino · Accepted Answer

salut,

pas la bonne méthode pour ouvrir excel, voici comment procéder :

déjà, référence dans ton projet ppt (menu outils du vba) Microsoft excel objects library

Ensuite, quand t'as besoin d'ouvrir :

Dim xlApp as New Excel.Application
Dim xlBook as Excel.Workbook
Dim xlSheet as Excel.Worksheet

xlApp.Visible = true
set xlBook = xlApp.WorkBooks.Open "c:\chemin
om fichier.xls"
set xlSheet = xlBook.Sheets("Nom feuille")
xlSheet.Select

et quand t'as plus besoin,

xlBook.Close True 'ou false
Set xlSheet = nothing
Set xlBook = nothing
Set xlApp = nothing

@++

le mystérieux chevalier,"Provençal, le gaulois"
Forum Office & VBA

Ouvrir un fichier xls

1 réponse

Votre réponse

Discussions similaires