Ouvrir un fichier excel

Résolu
Signaler
Messages postés
51
Date d'inscription
mercredi 15 décembre 2004
Statut
Membre
Dernière intervention
11 mai 2006
-
Messages postés
1
Date d'inscription
mardi 5 juillet 2011
Statut
Membre
Dernière intervention
21 juillet 2011
-
Bonjour,

Alors voila, j'ai fait un boutton qui me permet d'ouvrir un fichier
Exel a partir d'une application vb6. Mais je cela ne fonctionne pas.

Il me marque compile error: user-definided type not definided à la première ligne "appExcel As Excel.Application".

Quelqu'un pourrait-il m'aider ? svp

Merci



code:

Const Serveur = "Excel|c:\relever_polluants.xls"



Private Sub Command5_Click()

'Déclaration des variables

Dim appExcel As Excel.Application 'Application Excel

Dim wbExcel As Excel.Workbook 'Classeur Excel

Dim wsExcel As Excel.Worksheet 'Feuille Excel

'Ouverture de l'application

Set appExcel = CreateObject("Excel.Application")

'Ouverture d'un fichier Excel

Set wbExcel = appExcel.Workbooks.Open("C:\relever_polluants.xls")

'wsExcel correspond à la première feuille du fichier

Set wsExcel = wbExcel.Worksheets(1)

End Sub

8 réponses

Messages postés
1788
Date d'inscription
mardi 7 novembre 2000
Statut
Membre
Dernière intervention
11 mars 2006
26
Bonsoir,

Dans le menu Projet / Références, as-tu cochés la référence à Excel ??



jpleroisse
3
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 109 internautes nous ont dit merci ce mois-ci

Messages postés
3
Date d'inscription
mercredi 11 août 2004
Statut
Membre
Dernière intervention
12 février 2006

Salut

Elle est ouverte mais masquée. Rajoute appExcel.visible=True

yopop
3
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 109 internautes nous ont dit merci ce mois-ci

Messages postés
51
Date d'inscription
mercredi 15 décembre 2004
Statut
Membre
Dernière intervention
11 mai 2006

Non, j'avais oublié de le faire.

Maintenant, c'est fait, il ne me met plus d'erreur, mais il ne lance toujours pas le fichier demandé.
Messages postés
51
Date d'inscription
mercredi 15 décembre 2004
Statut
Membre
Dernière intervention
11 mai 2006

ok, sa a marché.
Merci beaucoup jperloisse et yopop.
Messages postés
2
Date d'inscription
jeudi 27 novembre 2008
Statut
Membre
Dernière intervention
7 mars 2009

Trop bien !! Depuis le temps que je cherche ce code !!












Joney 76
Messages postés
1
Date d'inscription
mardi 18 août 2009
Statut
Membre
Dernière intervention
20 février 2010

je ne désir plus recevoir de mail

Merci

PLMAF
Messages postés
18038
Date d'inscription
lundi 7 décembre 2009
Statut
Modérateur
Dernière intervention
11 avril 2018
240
je ne désir plus recevoir de mail

Détruis ton compte email
Ce devrait être radical et vachement efficace
Ah oui : MERCI ....

____________________
Vous aimez Codes-Sources ? Il vous aide ? Cliquez ici pour l'aider à continuer
Cliquer sur "Réponse acceptée" en bas d'une solution adéquate est
Messages postés
1
Date d'inscription
mardi 5 juillet 2011
Statut
Membre
Dernière intervention
21 juillet 2011

salut tous le monde
svp j'aimerai bien si vous pouvez m'envoyez ce code ou cette application car il a une relation avec mon application
voici mon mail ammmmina@hotmail.com
et merci d'avance