Discussion :

[cpf2006]

Bonjour,

J'ai un important exécutable écrit en VB6.
Depuis l'installation de Office 365, impossible d'instancier un object Word, Excel ou Outlook.

Dans "outils/references", les objects du type "MS Word 16", "MS Excel 16" et "MS Outlook 16" ne s'y trouvaient pas après l'installation d'Office 365.
Je les ai donc ajoutés en allant les chercher là où ils se trouvent à savoir :
"C:\Program Files\Microsoft Office\root\Office16\"
Il s'agit des fichiers : Excel.exe, MSWORD.OLB et MSOUT.OLB

J'ai pu compiler sans erreur l’exécutable mais au moment d'instancier les objets, j'ai le message :
"Error 429 ActiveX component can't create object"

Lorsque je vais dans "View/Object Browsser" et que je fais une recherche dans les librairies d'une des 3 librairies citées ci-dessus, les descriptions de celles-ci ne reprennent que le nom de la librairie et PAS les chemins des celles-ci

par exemple, une recherche sur "outlook" me donne :

"Microsfoft Outlook 16.0 Object Library"

mais pas le chemin

Tandis que pour les autres librairies, j'ai le chemin comme par exemple avec "VB" :

"C:\program files (x86)\Microsoft Visual Studio\VB98\VB6.OLB"
"Visual Basic Objects and procedures"

Lorsque j'ouvre avec un éditeur (notepad++) le fichier vb6 "blabla.vbp", les descriptions des librairies et leur chemin s'y trouvent, également pour les 3 librairies Office.
C'est comme si VB6 ne voulait pas les prendre en charge

Je me demande quelle en est la raison ?
Si ce n'est tout simplement pas parce qu'elles sont installées dans "program Files" et non "program files (x86)", c'est à dire parce qu'elle tourne en 64 bits au lieu de 32 bits ?

Merci d'avance pour vos éclaircissements

Cpf

[cpf2006]

Bonjour,

Je vois que personne ne réagit !
Soit ce n'est pas clair, soit personne n'a d'idée là-dessus ?

Merci

cpf

[ONTAYG]

Bonjour,

Je n'ai plus VB6 sur mon PC (je suis passé en vb.net), mais Office 365 oui, as-tu fait une installation en client lourd ?

ONTAYG

[P.Lib]

Bonjour cpf2006, as-tu résolu ton problème depuis 2021 ?
Je me heurte à la même chose avec des applications écrites en VB6 depuis l'installation d'office 2021.
Merci

[umfred]

Soit c'est un problème d'enregistrement de dll (réparer l'installation d'office peut aider à résoudre le souci)
Soit il faut changer la façon de créer l'objet
(ou les deux)
ce code devrait fonctionner quelque soit la version d'Excel installé (utilisation du late binding), le seul inconvénient, c'est que l'on perd l'autocompletion/intellisense:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Dim xlApp as Object
Dim ws as object
Set xlApp= CreateObject("Excel.Application")
Set ws = CreateObject("Excel.Worksheet")
 
xlApp.visible=True ' pour afficher l'instance d'Excel
...
xlApp.Quiit 'ferme Excel
Set xlApp = Nothing

[P.Lib]

Merci de ta réponse mais elle ne va pas beaucoup m'aider, j'ai déjà fait tout ce que tu préconises et sans succès.
Je pense que le problème vient de ce que Office2021 pro Plus travaille uniquement en 64 bits et que VB6 ne peut accéder aux bibliothèques d'excel.
J'ai essayé d'installer par dessus une version en 32 bits mais Office n'accepte pas la présence de 2 versions différente sur le même disque.
J'ai donc installé Office 2016 en 32 bits et ça fonctionne nickel, tant pis pour mes 16€ dépensés dans le prix d'Office 2021 sur Codesproduit.fr.
Bonne journée

[umfred]

mon test fonctionne alors que j'ai office 365 en 64 bits.
ça vient peut-être aussi de ta version d'office 2021 si elle est en click to run ou en msi