#12 Error when reading data in the module

[Peter Keller]

The Scrambling function reports an automation error in the function "read component code(vbc as object, f as string) when reading the visible code as shown below:

Values: sline = "byref namemacro as string, optional txtshortcut as string) as commandbarbutton"

This code belong to the procedure with the following code:
Private Function MakeSubMenuItem(ByRef MenuItem As CommandBarControl, ByRef NameMenuItem As String, _
ByRef FaceID As Long, ByRef BoolBeginGroup As Boolean, _
ByRef NameMacro As String, Optional txtShortcut As String) As CommandBarButton
'...
End Function

The interesting thing is that the function has not been scrambled at all ( i excluded it with #begin_visible,...). The fix I found to allow scrambling is to open the excel file - that i want to scramble - with disabled macros. So I guess the error has to do with the debugger, but the question remains why I'm the only one who has this problem.

Regards
Peter