Ausschneiden in Excel verhindern
Schritt-für-Schritt-Anleitung
Um das Ausschneiden in Excel zu verhindern, kannst Du VBA (Visual Basic for Applications) verwenden. Folge diesen Schritten:
-
Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.
-
Wähle im Projekt-Explorer das Arbeitsblatt aus, in dem Du das Ausschneiden verhindern möchtest.
-
Füge den folgenden Code in das Codefenster ein:
Private Sub Workbook_Open()
' [STRG]+[X] deaktivieren
Application.OnKey "^x", ""
' Menü Bearbeiten teilweise deaktivieren
With Application.CommandBars("Worksheet Menu Bar").Controls("Bearbeiten")
.Controls("Ausschneiden").Enabled = False
End With
' Symbole deaktivieren
With Application.CommandBars("Standard")
.FindControl(ID:=21).Enabled = False ' Ausschneiden
End With
' Menü rechte Maustaste deaktivieren
Application.CommandBars("Cell").Enabled = False
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
' Standardeinstellung für [STRG]+[X] wieder herstellen
Application.OnKey "^x"
' Die Menüs wieder aktivieren
Application.CommandBars("Worksheet Menu Bar").Reset
Application.CommandBars("Standard").Reset
Application.CommandBars("Cell").Enabled = True
End Sub
-
Schließe den VBA-Editor und speichere Deine Datei als Makro-fähige Arbeitsmappe (*.xlsm).
Damit wird das Ausschneiden sowohl über die Tastenkombination STRG + X als auch über das Menü und die rechte Maustaste deaktiviert.
Häufige Fehler und Lösungen
-
Fehler: Die Änderungen sind nicht sichtbar, wenn ich die Datei schließe und erneut öffne.
- Lösung: Stelle sicher, dass Du die Datei als Makro-fähige Arbeitsmappe gespeichert hast.
-
Fehler: Ich kann das Ausschneiden trotzdem durchführen.
- Lösung: Überprüfe, ob Du den Code im richtigen Arbeitsblatt eingefügt hast und dass die Makros aktiviert sind.
Alternative Methoden
Wenn Du VBA nicht verwenden möchtest, kannst Du auch folgende Methoden ausprobieren:
-
Schutz der Arbeitsmappe: Du kannst die Arbeitsmappe schützen, sodass Benutzer keine Änderungen vornehmen können, einschließlich Ausschneiden.
- Gehe auf
Überprüfen > Blattschutz und aktiviere die entsprechenden Optionen.
-
Datenvalidierung: Setze eine Datenvalidierung für die Zellen, die Du schützen möchtest. Dies kann zwar das Ausschneiden nicht direkt verhindern, aber es hilft, das unerwünschte Bearbeiten zu kontrollieren.
Praktische Beispiele
Ein Beispiel für einen vollständigen VBA-Code, um das Ausschneiden zu verhindern:
Private Sub Workbook_Open()
Application.OnKey "^x", ""
With Application.CommandBars("Worksheet Menu Bar").Controls("Bearbeiten")
.Controls("Ausschneiden").Enabled = False
End With
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.OnKey "^x"
Application.CommandBars("Worksheet Menu Bar").Reset
End Sub
Setze diesen Code in das ThisWorkbook Modul ein, um die Funktionalität für die gesamte Arbeitsmappe zu aktivieren.
Tipps für Profis
- .OnKey man: Nutze die
.OnKey Methode, um andere Tastenkombinationen zu deaktivieren oder eigene Funktionen zu erstellen.
- Halte Deinen VBA-Code ordentlich und kommentiere Deine Abschnitte, um die Wartung zu erleichtern.
- Teste Deinen Code gründlich in verschiedenen Szenarien, um unerwartete Probleme zu vermeiden.
FAQ: Häufige Fragen
1. Wie kann ich das Ausschneiden nur für bestimmte Benutzer deaktivieren?
Du kannst die Benutzeridentifikation in VBA verwenden, um spezifische Einstellungen für unterschiedliche Nutzer zu implementieren.
2. Was passiert, wenn ich die Datei ohne Makros öffne?
Wenn Du die Datei ohne Makros öffnest, sind die Einstellungen zum Verhindern des Ausschneidens nicht aktiv. Stelle sicher, dass die Makros aktiviert sind, wenn Du die Datei öffnest.