Zeilen ausblenden trotz Blattschutz

Computer: Software & Programmierung Office Software
#1

Hallo,

ich habe mal wieder ein Problem bezügl. Excel und dem Blattschutz. Die Lösung dessen stellt sich so dar, daß meine Tabelle perfekt waere wenn ich in meinen Excell Tabellen TROTZ AKTIVIERTEM BLATTSCHUTZ, Zeilen und Spalten aus- und einblenden könnte.

Wieso weshalb ist ja prinzipiell egal.

Nun bin ich kein Experte, würde aber mal sagen das dies nur über diese VBa Funktionen möglich ist. Habe mir dafür auch die gepostete Anfänger Datei durchgelesen, verstehe aber nicht alles.

Ein Problem das ich da rauslese ist noch folgendes:
Diese Dateien werden zu den entsprechenden Producern geschickt und müssen dort die selben Bedingungen (aktivierter Blattschutz mit den ausgeblendeten Zeilen) erfüllen, dh: auf anderen Rechnern müssen diese Funktionen genau so erhalten bleiben.

Ist irgendwer in der Lage mir diesbezüglich weiterzuhelfen?
Waere wirklich nett.

Danke schon einmal!

Viele Grüße
Ben

#2

Hallo,

da brauchst Du kein VBA, es geht ganz einfach. Wenn Du den Blattschutz aktivierst, klickst Du im Dialog an: Benutzer dürfen Zeilen formatieren , dann kann der Benutzer Zeilenhöhe einstellen und auch eine Zeile ein- oder ausblenden.

Gruß, Bernd

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

#3

Hallo Berndt,

ersteinmal Danke für die schnelle Antwort, aber ein entsprechendes Dialogfenster gibt es bei mir nicht. Welche Version hast du denn?
Bin wie gesagt kein Excel Crack, kann man dies irgendwie über Optionen einstellen?
Hab da nämlich schon einiges ausprobiert aber nicht wirklich was gefunden.

Waer nett wenn du das nochmal naeher erklaeren könntest.

Danke dir!

Gruß
Ben

Hallo,

da brauchst Du kein VBA, es geht ganz einfach. Wenn Du den
Blattschutz aktivierst, klickst Du im Dialog an: Benutzer
dürfen Zeilen formatieren , dann kann der Benutzer
Zeilenhöhe einstellen und auch eine Zeile ein- oder
ausblenden.

Gruß, Bernd

#4

Hallo,

der Dialog erscheint, wenn Du im Menü Extras den Befehl Schutz und den Unterbefehl Blatt schützen wählst.

Gruß, Bernd

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

#5

Hi Ben,

jemand hat mal diesen Code gepostet:

in DIESE ARBEITSMAPPE

Private Sub Workbook\_Open()
 Dim oWS
 
 For Each oWS In ActiveWorkbook.Worksheets
 oWS.Protect UserInterfaceOnly:=True
 oWS.EnableOutlining = True
 Next ' oWS In ActiveWorkbook.Worksheets
End Sub

Gruß

Rolf

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]