Hallo,
ich suche eine Möglichkeit, um (aus einem Makro heraus) zu überprüfen, ob eine EXCEL-Datei Makros enthält. Ich arbeite mit EXCEL 2003.
In einem Forum fand ich die folgende Variante:
Set ref = Workbooks(wb).VBProject.References
For Each r In ref
If r.Type = 1 Then
RefCheck = r.FullPath
Exit Function
End If
Next
Dummerweise funktioniert das nicht. Alle gefundenen References haben Type=0, und es gibt keinen Unterschied zwischen Dateien mit oder ohne Makros.
Vielen Dank für Eure Hilfe. |