ich importiere per VBA Codemodule (aus sImportFromPath) in eine Excel-Datei (sImportToFile). Auf meinem Rechner funktioniert auch alles wunderbar; auf einem anderen Rechner reagiert das "Workbooks.Open" sehr seltsam: anstatt im Code weiterzumachen, wird die Zieldatei geöffnet (sichtbar im Vordergrund) und dann ist Ende.
Dim obImportComponent As Object
Dim wbImportWorkbook As Workbook
Dim sImportToFile As String
Dim sImportFromPath As String
sImportToFile = ActiveSheet.Range("D6").Value
sImportFromPath = ActiveSheet.Range("D8").Value
Application.EnableEvents = False
Workbooks.Open sImportToFile
Application.EnableEvents = True
Set wbImportWorkbook = Workbooks(getName(sImportToFile))
With wbImportWorkbook.VBProject
For Each obImportComponent In .VBComponents
[...]
Auf beiden Rechnern läuft derselbe Code; es ist dieselbe Excel-Version installiert (2007), dasselbe Betriebssystem (Windows 7), dieselben Verweise:Visual Basic For Applications
Microsoft Excel 12.0 Object Library
OLE Automation
Microsoft Office 12.0 Object Library
Hat irgendjemand eine Idee, woran das liegen könnte? Oder zumindestens, was man noch überprüfen könnte? Ich bin dankbar für jeden Hinweis, jede Idee, jede Vermutung!
Grüße
Burkhard