Excel-Makro: Formeln verstecken und Arbeitsmappe schützen
Problem: Ich muss ca. 150 Arbeitsmappen mit je 30 Blättern schützen. Die Zellen sind schon geschützt, ich muss nur die Blätter (besser gesagt die ganze Arbeitsmappe) schützen. Ich möchte nicht bei jeder Mappe von Blatt zu Blatt springen. Ein Passwort brauche ich hierfür nicht; es geht nur um unbeabsichtigte Änderungen. Wie bringe ich das hin?
Lösung: Das geht mit einem Makro, das erstens die Formeln ausblendet und zweitens die Blätter schützt.
Verwenden Sie diesen Makrocode:
Sub Protect_all_Sheets()
Dim wks As Worksheet
For Each wks In ActiveWorkbook.Worksheets
wks.UsedRange.Cells.FormulaHidden = True
wks.Protect
Next wks
End Sub

Das Makro im Visual-Basic-Editor
So brauchen Sie nicht jedes Blatt einzeln zu bearbeiten. Legen Sie einfach das Makro in eine neue Datei, die Sie als *.xlsm abspeichern, öffnen Sie nebenher die betroffenen Dateien und führen Sie in jeder einmal das Makro aus. Das kann auch direkt über die grüne Play-Taste im Visual-Basic-Editor erfolgen. (PCtipp-Forum)
Gaby Salvisberg ![]()
Windows 7
Windows 8
Windows 2000
Windows XP
Windows Vista
Linux
Mac
Sicherheit
Internet
Office
Multimedia
Spiele
Hardware
Windows9x/NT
Mobile
Sonstiges
![]()