Wie gruppiere und gruppiere ich Zeilen in einem geschützten Arbeitsblatt?
Wie wir alle wissen, gibt es in einem geschützten Arbeitsblatt viele Einschränkungen für die Anwendung einiger Operationen. So können wir nicht zwischen gruppierten und nicht gruppierten Daten wechseln. Gibt es eine Möglichkeit, Zeilen in einem geschützten Arbeitsblatt zu gruppieren oder die Gruppierung aufzuheben?
Gruppieren und Aufheben der Gruppierung von Zeilen in einem geschützten Arbeitsblatt mit VBA-Code
Gruppieren und Aufheben der Gruppierung von Zeilen in einem geschützten Arbeitsblatt mit VBA-Code
Möglicherweise gibt es keinen anderen guten Weg, um dieses Problem zu lösen, als einen VBA-Code zu verwenden. Gehen Sie dazu wie folgt vor:
1. Aktivieren Sie Ihr Arbeitsblatt, das Sie verwenden möchten. Stellen Sie sicher, dass das Arbeitsblatt noch nicht geschützt ist.
2. Dann halten Sie die ALT + F11 Tasten, und es öffnet die Microsoft Visual Basic für Applikationen-Fenster.
3. Klicken Sie Insert > Modulund fügen Sie den folgenden Code in das Feld ein Modulfenster.
VBA-Code: Gruppieren und Aufheben der Gruppierung von Zeilen in einem geschützten Arbeitsblatt
Sub EnableOutlining()
'Update 20140603
Dim xWs As Worksheet
Set xWs = Application.ActiveSheet
Dim xPws As String
xPws = Application.InputBox("Password:", xTitleId, "", Type:=2)
xWs.Protect Password:=xPws, Userinterfaceonly:=True
xWs.EnableOutlining = True
End Sub
4. Dann drücken F5 Wenn Sie die Taste drücken, um diesen Code auszuführen, wird ein Eingabeaufforderungsfeld angezeigt, das Sie daran erinnert, das Kennwort einzugeben, um das aktuelle Arbeitsblatt zu schützen. Siehe Screenshot:
5. Dann klick OKIhr Arbeitsblatt wurde geschützt, aber Sie können die Umrisssymbole in diesem geschützten Arbeitsblatt erweitern und verkleinern, siehe Screenshot:
Note: Wenn Ihr Arbeitsblatt bereits geschützt ist, funktioniert dieser Code nicht.
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!