Dans VBA, ne peut pas utiliser d'Accès.Objet de l'Application
Cela ne fonctionne PAS:
Sub X()
Dim A As Access.Application
Set A = CreateObject("Access.Application")
'Do Stuff
End Sub
Cependant, ce N'travail:
Sub X()
Dim A As Object
Set A = CreateObject("Access.Application")
'Do Stuff
End Sub
Je sais qu'ils ne font pratiquement la même chose, mais quelqu'un peut me dire comment faire un accès.objet de l'application? Je dois ajouter que j'ai de Crystal Reports 11 et sur ma dernière mise à jour, il peut avoir 'non' VBA Dll.
(Mise à jour 2009-06-29)
En réponse aux 2 premières questions, je suis en utilisant MS Access VBA pour contrôler certains autres Accès & fichiers Excel. Depuis, cela ne sera jamais exécuté sur ma machine locale, je peux vous garantir que l'Accès sera toujours installé. J'ai également fait référence à la "Microsoft Access 11.0 Object Library" (MSACC.OLB).
Je sais qu'il ya des façons de contourner cela, c'est à dire utiliser la liaison anticipée lors du codage, et de passer à la liaison tardive lors de l'exécution, je ne comprends juste pas pourquoi le début de la liaison méthode ne fonctionne pas sur ma machine (bien sûr, le code fonctionne bien sur une autre machine avec un Accès).
Vous devez vous connecter pour publier un commentaire.
Bonjour,
Le code que vous dites n'est pas de travail est légal de syntaxe. Quelle erreur avez-vous? Quand survient-il? Connaissez-vous la ligne de code qu'il se passe?
Tout comme une note de côté, ce qui est légal syntaxe:
Mais pour être clair, le CreateObject Syntaxe est légale et n'est pas la source du problème.
Si vous êtes à la rédaction de cet Accès n'est pas nécessaire de le faire que l'objet Application est déjà là pour vous. Si vous êtes à la rédaction de ce document Excel ou Word, alors vous devez ajouter une référence à la Bibliothèque d'Accès. Allez dans Outils/Références et de regarder pour Microsoft Access XX Bibliothèque d'Objets
Essayer Détecter Et Réparer dans le menu Aide dans MS Access. Travaillé parfait pour moi.