nicht ausgeführte makros
17.05.2005 23:30:47
manfred
Worksheet_activate etc. keine Reaktion mehr erfolgt, obwohl die entsprechenden Makros fehlerfrei ablaufen, wenn ich sie im Einzelschrittmodus durchlaufe. Zum Beispiel schalte ich mit den folgenden Aufrufen Copy and Paste und das Extras Menue ein / aus.
Wieder jede Logik funktioniert das aber nicht.
Zwar wird copy and paste zunächst abgeschaltet, geht man aus dem File raus ist es logischer weise wieder verfügbar (Workbook_deactivate.....) aber das Workbook_activate bzw. worksheet_activate löst keinen erneuten Schutz vor Copy and Paste aus.
Kann das mit selbstgeschriebenen Excelfunktionen (zur Nutzung auf Spreadsheet ebene zusammenhängen? )
Private Sub Worksheet_Activate()
' Beschreibung:
' Verbietet copy and paste und extras
' Eingabeparamter: keine
' Rückgabewerte: keine
Call DisableCopyCutAndPaste
Call extrasaus
End Sub
Private Sub Worksheet_Deactivate()
' $Version$ 1.0 (02.05.2005)
' Beschreibung:
' ermöglicht copy and paste und extras
' Eingabeparamter: keine
' Rückgabewerte: keine
Call EnableCopyCutAndPaste
Call extrasein
End Sub
Die Unterfunktionen selbst haben folgende Struktur
Public Sub DisableCopyCutAndPaste()
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'
' Beschreibung:
' Die Excel internen Funktionen CUT, COPY, PASTE, PASTESPEZIAL
' werden disabled
'
' Eingabeparamter: keine
'
' Rückgabewerte: keine
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
On Error Resume Next
EnableControl 21, False ' cut
EnableControl 19, False ' copy
' usw
End Sub
sorry viele Fragen, aber das nervt mich und kostet wahnsinnig viel zeit.
Für Hilfe oder ähnliche Leidensberichte wäre ich dankbar.
Gruss
Manfred