early binding met vba

[JelleKoen]

Voor een kennis maakte ik database in Access2007 met een early binding naar de Word en Excel biblioteek (12). Zelf werk ik inmiddels in Access2016, maar als ik de database voor hem terugplaats moet ik natuurlijk weer de 12 terug. Ik zou de foutmelding willen ondervangen en de early binding met een vba-opdracht willen herstellen. Op internet heb ik een dergelijke code nog niet kunnen vinden.
Heeft iemand suggesties?

 

[OctaFish]

Je zou natuurlijk Late Binding kunnen (of moeten) overwegen als je databases maakt die op meerdere platforms moeten draaien, want dan weet je 100% zeker dat het altijd werkt. En wie wil die zekerheid nou niet? .
Maar wellicht kun je hier wat mee:

Public Function ReAddLibrary()

Dim accessProj As Access.Application 
Dim chkRef As Access.Reference ' 
Set accessProj = Access.Application

   ' Check through the selected references.
   For Each chkRef In accessProj.References
      ' If the reference "MyReference" exists then remove.
      If chkRef.Name = "MyReference" Then
         accessProj.References.Remove chkRef
         Exit For
      End If

   Next

‘ Add back the reference “MyReference” from specified location.   
accessProj.References.AddFromFile "Access Database Path"

End Function

 

[JelleKoen]

Dank voor je reactie. References.. Daar moet ik nu wel uit kunnen komen.
Ik zal inderdaad eens kijken of het ombouwen naar late binding (maar dan mis ik wel de makkelijke automatische 'punt-aanvullingen') niet te veel werk is.
En overigens ook dank voor je Access-cursus.

 

[OctaFish]

In de cursus staat een apart hoofdstuk over Late vs Early Binding, en ook de tip om de db te bouwen met EB, en als hij af is om te zetten naar LB. Dat is niet zo moeilijk als het lijkt. Dan heb je de voordelen zonder de nadelen.