Hallo Boardgemeinde,

hatte unten stehenden Code geschrieben (Tool-Datei), der auch ganz hervorragend arbeitete. Habe dann die Ziel-Datei als auch die Tool-Datei (mit verschiedenen anderen Änderungsmakros) kopiert. Bei der Zieldatei anschliessend einige Sheets gelöscht oder geändert (kein Bezug zu unten stehendem Code).
In der kopierten bzw. geänderten Form erhalte ich (beim Debuggen/Einzelschritt) Fehlermeldung 1004 bzw. Methode"VB Project für das Objekt" _ Workbook ist fehlgeschlagen.
In meinem EXCEL/VBA-Buch steht der Hinweis, unter 'Extras' 'Makro' 'Sicherheit' das Kästen unter 'Vertrauenswürdige Quellen' 'Zugriff auf Visual Basic-Project vertrauen' zu aktivieren. Diesen Tip habe ich auch in verschiedenen Beiträgen dieses Boards gefunden. Leider erhalte ich danach zwar keine 1004er Fehlermeldung mehr, jedoch ein Windows-Popup mit der Meldung: "Microsoft Excel hat ein Problem festgestellt und muss beendet werden." Zusätzlich soll ein Problembericht versandt werden.
Tja und bei einer anschliessenden Kontrolle muss ich feststellen, dass das Kästen 'Vertrauenswürdige Quellen' 'Zugriff auf Visual Basic-Project vertrauen' wieder deaktiviert ist. Vielleicht hat jemand einen Tip von Euch?

Im voraus vielen Dank!

Rafael

Hier der Code, der die Fehlermeldung 1004 auslöst:

Set WS = Worksheets.Add
Set VB_Comp = Workbooks("NonEuroData").VBProject.VBComponents(WS.CodeName)
With VB_Comp.CodeModule
.InsertLines 1, "Private Sub Worksheet_Calculate()"