Mon coll=E8gue a d=E9velopp=E9 une application sous access 97=20
(sous le systeme d'exploitation 98). Il fait appel aux=20
r=E9f=E9rences : Excel8.OLB (Version 8.0), Vbapplication=20
Vba332.dll (version 3.0.7019)pour faire un export vers=20
excel (ouverture d'un fichier excel avec des listes=20
d=E9roulante)=20
Or sur mon poste : systeme exploitation XP Pro , Excel=20
97, Access 97, l'export vers excel ne se fait pas (excel=20
ne s'ouvre pas : erreur : "Erreur d'ex=E9cution -214741851=20
(8001015) la method ADD de l'objet 'Workbooks' a echoue"
Dim MonExcel As Excel.Application
Dim Monclasseur As Excel.Workbook
'ouverture Excel cr=E9ation du fichier
Set MonExcel =3D CreateObject("Excel.application")
MonExcel.Workbooks.Add
MonExcel.Visible =3D True
Set Monclasseur =3D MonExcel.ActiveWorkbook
Monclasseur.Worksheets.Add
Set MaFeuille =3D Monclasseur.ActiveSheet
'g=E9n=E9ration des listes sur une feuille 2
'cr=E9ation d'une feuille param=E9tre
Set nvlleFeuille =3D Monclasseur.Sheets.Add
(Type:=3DxlWorksheet)
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Denis Taglia
Bonjour, Je ne suis pas sûr pour cause de config un peu differente. J'ai bien access97 mais excel XP pour la méthode Add de la feuille ça fonctionne si je modifie les dim Dim MonExcel As Object Dim Monclasseur As Object C'est peut-être un bout de piste Denis
Bonjour,
Je ne suis pas sûr pour cause de config un peu differente. J'ai bien
access97 mais excel XP pour la méthode Add de la feuille ça fonctionne si je
modifie les dim
Dim MonExcel As Object
Dim Monclasseur As Object
C'est peut-être un bout de piste
Denis
Bonjour, Je ne suis pas sûr pour cause de config un peu differente. J'ai bien access97 mais excel XP pour la méthode Add de la feuille ça fonctionne si je modifie les dim Dim MonExcel As Object Dim Monclasseur As Object C'est peut-être un bout de piste Denis