Ouvrir un fichier excel à partir de vb6

[Résolu]
Signaler
Messages postés
36
Date d'inscription
jeudi 27 juillet 2006
Statut
Membre
Dernière intervention
26 septembre 2006
-
Messages postés
36
Date d'inscription
jeudi 27 juillet 2006
Statut
Membre
Dernière intervention
26 septembre 2006
-
Pouvez-vous m'aider!!!
je dois ouvrir un fichier excel et qu'il devienne en premier plan.
moi je developpe avec vb6.
merci

3 réponses

Messages postés
14008
Date d'inscription
samedi 29 décembre 2001
Statut
Modérateur
Dernière intervention
28 août 2015
80
Il te suffit de lancer ton fichier de donnée XLS avec ShellExecute (très simple)
Cherche ce mot parmi les sources

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Champion du monde de boule de cristal - 2005
Le savoir est la seule matière qui s'accro
Messages postés
53
Date d'inscription
mardi 3 janvier 2006
Statut
Membre
Dernière intervention
20 mars 2008

Voila un solution simple:



Option Explicit
    Dim ObjExcel As Variant ' un pointeur pour l'application
    Dim ObjFeuil As Variant ' un autre pointeur pour la feuile
___________________________________________________________________



Private Sub Form_Load()
   Set ObjExcel = CreateObjec t("EXCEL.APPLICATION") ' Creer un objet EXCEL
   Set ObjFeuil = ObjExcel.workbooks.open("c:\test.xls") ' Creer un objet feuile
   ObjExcel.Visible = True'Afficher la resultat
End Sub
____________________________________________________________________



Private Sub Form_Unload(Cancel As Integer)
    ObjFeuil.Close True     'Fermer le fichier
    Set ObjFeuil = Nothing  'Libirer les resources
    Set ObjExcel = Nothing  'idem
End Sub

enjoy
Messages postés
36
Date d'inscription
jeudi 27 juillet 2006
Statut
Membre
Dernière intervention
26 septembre 2006

merci bcp