Umstellung EarlyBinding -> LateBinding
Gerd
ich versuche eine Function von Early Binding auf Late Binding umzustellen, da die Application, auf die Excel hier zur Laufzeit zugreift nicht auf allen Rechner vorhanden ist, an die die Mappe verteilt wird.
Im Early Binding Modus läuft alles ohne Probleme, die Code Variante Late Bindung führt zum Fehler
"Objekterstellung duch ActiveX Komponente nicht möglich".
Was könnte ich hier falsch machen oder nicht beachtet haben ?
Ich habe:
1. Die Deklaration der Variablen als Objekt vorgenommen
2. per Create Object das Object definiert
3. den Verweis deaktiviert
so sieht es mit beiden Varianten aus:
On Error GoTo Errorhandling
'Referenz auf die Sitzungsstruktur der aktuellen Applikation holen
'Early Binding Modus
'Dim App As New ProfessionalPlanner.Application
'Dim PPTree As PPOrganizationTree.PPOrganizationTree
'Set PPTree = App.GetSessionTree
'ENDE Early Binding Modus
'Late Binding Modus
Dim App As Object
Dim PPTree As Object
Set App = CreateObject("ProfessionalPlanner.Application")
Set PPTree = CreateObject("PPOrganizationTree.PPOrganizationTree")
Set PPTree = App.GetSessionTree
'ENDE Late Binding Modus
Ich freue mich über jede Idee,
Gerd