Laufzeitfehler - Code löschen
02.05.2006 10:39:48
Dr.
ich lösche den Code auf einem exportierten Arbeitsblatt mit
Sub test()
With ActiveSheet.Parent.VBProject.VBComponents(ActiveSheet.CodeName).CodeModule
.DeleteLines 1, .CountofLines
End With
End Sub
Nach Umstellung auf XP erhalte ich bei diesen Zeilen folgende Meldung:
"Laufzeitfehler 1001: Der programmatische Zugriff auf das Visual-Basic-Projekt ist nicht sicher".
Kann mir jemand sagen, wo da der Hase im Pfeffer liegt?
Besten Dank im voraus!
Anzeige