Wie kann die Auswahl mehrerer Arbeitsblätter in Excel verhindert werden?
Wenn Sie versehentlich mehrere Arbeitsblätter auswählen und bearbeiten, werden alle ausgewählten Arbeitsblätter mit demselben Inhalt behandelt. Hier stellen wir Ihnen eine Methode vor, mit der Sie verhindern können, dass mehrere Arbeitsblätter gleichzeitig ausgewählt werden, um zu vermeiden, dass auf diesen Arbeitsblättern derselbe Inhalt angezeigt wird.
Verhindern Sie die Auswahl mehrerer Arbeitsblätter mit VBA-Code
Verhindern Sie die Auswahl mehrerer Arbeitsblätter mit VBA-Code
Gehen Sie wie folgt vor, um zu verhindern, dass mehrere Arbeitsblätter gleichzeitig ausgewählt werden.
1. Klicken Sie in dem Arbeitsblatt, das Sie bearbeiten müssen, mit der rechten Maustaste auf die Registerkarte Blatt und wählen Sie Code anzeigen aus dem Kontextmenü.
2. Kopieren Sie dann den folgenden VBA-Code und fügen Sie ihn in das ein Code Fenster des Auftauchens Microsoft Visual Basic für Applikationen Fenster.
VBA-Code: Verhindern Sie die Auswahl mehrerer Blätter in Excel
Private Sub Worksheet_Change(ByVal Target As Range)
Application.ScreenUpdating = False
On Error GoTo err_handler
If ActiveWindow.SelectedSheets.Count > 1 Then
If ActiveSheet Is Target.Parent Then
Application.EnableEvents = False
MsgBox "Please don't make changes with multiple sheets selected.", _
vbInformation, "Kutools for Excel"
Application.Undo
ActiveSheet.Select
End If
End If
err_handler:
Application.EnableEvents = True
Application.ScreenUpdating = True
End Sub3. Drücken Sie dann die Taste Andere + Q Tasten gleichzeitig zum Schließen der Microsoft Visual Basic für Applikationen Fenster.
4. Wenn Sie mehrere Arbeitsblätter mit dem aktuellen Blatt auswählen, Inhalte eingeben und die Eingabetaste drücken, erhalten Sie eine Kutools for Excel Das folgende Dialogfeld zeigt Sie an die Auswahl mehrerer Arbeitsblätter. Bitte klicken Sie auf OK .
Nach einem Klick auf die OK Schaltfläche, werden alle ausgewählten Blätter sofort die Gruppierung aufgehoben.
In Verbindung stehende Artikel:
- Wie lösche ich alle Blätter außer dem angegebenen / aktuellen in Excel?
- Wie erstelle ich neue Blätter für jede Zeile in Excel?
- Wie lösche ich ein Arbeitsblatt ohne Aufforderung oder Warnung in Excel?
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über 300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...
Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich
- Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
- Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!
