vb6 excel liaison tardive

J'utilise Office 2016 32 bits sur Win10. Le code suivant a fonctionné parfaitement et j'ai été capable de gérer tous les aspects d'Excel et de PPT à partir de VB6.vb6 excel liaison tardive

Public Sub Main() 
    '*********************BDOK GAM ****************************ú÷åôú 
    Dim xlApp As Object ' Late binding, or As Excel.Application with Early 
    Public PpApp As Object ' Late binding, or As Excel.Application with Early 

On Error Resume Next 
Set xlApp = GetObject(, "Excel.Application") 
Set PpApp = GetObject(, "PowerPoint.Application")

Mais maintenant, dans les derniers jours, le retour xlApp et ppApp « rien » et je n'ai pas la moindre idée de pourquoi? Excel et Powerpoint sont correctement référencées

Lorsque vous utilisez le même code dans le module VBA, il fonctionne très bien

Source

2017-10-09 user3387046

Les applications Excel et PPT sont-elles déjà ouvertes lorsque vous exécutez votre code? –

Oui Les applications Excel et PPT sont déjà ouvertes – user3387046

Si vous commentez le 'Sur erreur Resume Suivant', vous obtenez une erreur? –

J'ai trouvé que le composant MSCOMCTL.OCX n'a pas pu enregistrer correctement causant beaucoup de problèmes. J'ai réussi à corriger cela et maintenant la liaison tardive fonctionne correctement

Source

2017-10-10 06:38:47 user3387046

vb6 excel liaison tardive

Répondre

Questions connexes