Appexcel As Excel.Application ne fonctionne pas [Résolu]

Signaler
Messages postés
39
Date d'inscription
mardi 2 août 2005
Statut
Membre
Dernière intervention
31 mars 2006
-
Messages postés
39
Date d'inscription
mardi 2 août 2005
Statut
Membre
Dernière intervention
31 mars 2006
-
Je ne comprends pas pourquoi il beuge à ce niveau ??

Dim appexcel As Excel.Application
Dim Strfichier As String


strname = "TBClients_" & Mois & Annee & "_" & strnomagence & ".xls"
strname2 = "TBClients_" & Mois & Annee & "_" & strnomagence


'Création du classeur excel
Strfichier = DonneChemin("export") & "\clientsTT_F.xls"
Set appexcel = CreateObject("Excel.application")
Set fichier = appexcel.Workbooks.Open(Strfichier)
appexcel.Visible = True


fichier.saveas strcheminmois & strname
appexcel.Workbooks.Close
appexcel.Visible = False

Merci

Patrick

4 réponses

Messages postés
39
Date d'inscription
mardi 2 août 2005
Statut
Membre
Dernière intervention
31 mars 2006

Merci c'est génial je l'ai trouvé ne meme temps que toi !!
Merci pour ton aide c génial !!
Ca marche !

Patrick
3
Merci

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

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

Messages postés
402
Date d'inscription
jeudi 25 novembre 2004
Statut
Membre
Dernière intervention
7 juin 2009
4
Salut,

C'est parce que tu n'as pas ajouté Excel aux références de ton projet (donc,il ne connait pas les types de données associés à Excel.

Tu dois faire
Dim appexcel as Object.

Si tu ajoutes la référence à excel, tu peux faire
Dim appexcel as Excel.Applicatoin
et
Set appexcel new Excel.Application (à la place de Set appexcel CreateObject("Excel.Application"))

Dans tous les cas, n'oublie pas de faire :
appexcel.Quit (Ferme excel)
Set appexcel = Nothing (détruit l'objet temporaire)
à la fin de ton traitement
Messages postés
39
Date d'inscription
mardi 2 août 2005
Statut
Membre
Dernière intervention
31 mars 2006

Comment y faire référence STP ???

Patrick
Messages postés
71
Date d'inscription
jeudi 16 juin 2005
Statut
Membre
Dernière intervention
16 février 2007

Salut!

Regarde

Y-a t-il dans

Project->References

Microsoft Excel X.0 Object Library?