Bestimmte Zellgruppen/alle Formeln sperren

[happy-jack]

Hallo alle, 

Ich hätte da mal ein Problemchen..

Ich habe ein Excel-Programm mit insgesamt 12 Blättern und in vier Blättern viele Bereiche in denen Eingaben gemacht werden sollen aber auch viele komplizierte Formeln sind.

Nun komme ich mit der Excel-Zellen-Sperrung einfach nicht zurecht, funktioniert einfach nicht so richtig, da sind einzelne Zellen in einem gesperrten Bereich die nicht gesperrt sind oder es sind im nicht gesperrten Bereich einzelne Zellen oder Bereiche die nicht bearbeitbar sind usw.  Ich habe schon viele Stunden, ja Tage damit verbracht diese 12 Blätter richtig zu sperren, es will einfach nicht so richtig funktionieren !!    :22:

Auch die "bearbeitbaren Bereiche" zu markieren und "nicht zu sperren" funktioniert nicht richtig !
Es ist ein Chaos wenn unbeabsichtigt eine weit verschachtelte Formel gelöscht oder beschädigt wird.

Jetzt meine Frage/Bitte, könnte mir ein VBA-Profi ein kleines Programm schreiben welches in der ganzen Mappe ALLE FORMELN gegen Bearbeitung sperrt ?  Also nur alle Formeln !   Spaltenbreite und so sollte aber noch veränderbar sein.  evtl. mit einer frei positionierbaren "frei/gesperrt-Schaltfäche" auf einem extra Blatt.

..und da ich in VBA eine absolute Null bin, noch einen kleinen Hinweis wie/wo ich das installiern muss.
Das wäre sehr nett !

Oder gibt es eine andere Möglichkeit ganz einfach nur alle Formeln in der gazen Mappe zu sperren ?
Sollte doch eigentlich schon in Excel integriert sein und nicht so umständlich zu handhaben !

Im voraus mal vielen Dank an alle,

jack


Ach ja, "Formeln ausblenden" hatte ich auch schon versucht, da sieht man die Formeln zwar nicht, aber man kann sie trotzdem (noch eher) unbeabsichtigt kaputtmachen !!  *irre !!!

[WillWissen]

Hi,

STRG-1 / Schutz: markiere die Zellen, die du schützen willst und setze bei Gesperrt ein Häkchen. Wenn du auch noch zusätzlich verhindern willst, dass deine Formeln in der Bearbeitungsleiste zu sehen sind, setze ein zweites Häkchen bei Ausgeblendet. Jetzt kannst du unter Überprüfen / Blatt schützen anhaken, was trotz geschützter Zellen erlaubt sein soll. Danach den Blattschutz mit einem Passwort aktivieren.

[Käpt'n Blaubär]

Hallo,

der Code gehört hinter das Blatt, auf dem es wirken soll:

Option Explicit

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  On Error GoTo errHandler
  Application.EnableEvents = False
  Dim rgForbidden As Range
  Set rgForbidden = Cells.SpecialCells(xlCellTypeFormulas)
  If Not Application.Intersect(Target, rgForbidden) Is Nothing Then
     Range("B2").Select
  End If
errHandler:
  Application.EnableEvents = True
End Sub

[happy-jack]

Hi,

STRG-1 / Schutz: markiere die Zellen, die du schützen willst und setze bei Gesperrt ein Häkchen. Wenn du auch noch zusätzlich verhindern willst, dass deine Formeln in der Bearbeitungsleiste zu sehen sind, setze ein zweites Häkchen bei Ausgeblendet. Jetzt kannst du unter Überprüfen / Blatt schützen anhaken, was trotz geschützter Zellen erlaubt sein soll. Danach den Blattschutz mit einem Passwort aktivieren.

Hi WillWissen,
ja das habe ich alles schon xmal durchexerziert, aber wieso sind dann auch Zellen in denen Eingaben gemacht werden sollen auch gesperrt ? Liegt das an den x-verschachtelten Formeln die auf diese Zellen zugreifen ?
Beverly hatte empfohlen die "zu bearbeitenden Zellen" zu markieren weil ja sowieso das ganze Blatt bei Zellschutz aktivieren geschützt ist. Aber auch da kann ich noch einige Zellen aufrufen und deren Formeln "kaputt machen" !

Wie gesagt, ich mach schon viele Tage damit rum, die Excel-Hilfe habe ich schon 10x durchgelesen, warum hat noch niemand was erfunden das auf einen Klick ALLE FORMELN (und nur die Formeln) des ganzen Blattes gegen unbeabsichtigte Veränderung schützt, aber sonst noch alles (Zellformatierung und so) bearbeitbar bleibt ?

Meine Mappe hat 12 Blätter, in fast jedem sind etwa 4 Bereiche die Eingaben erwarten und Bereiche mit über viele Blätter verschachtelten Formeln.... Das ist auch sehr mühselig in jedem Blatt einzelne Bereiche zu schützen.

Gibt es wirklich nichts  wo mit einem Klick alle Formeln der ganzen Mappe schützt (und wieder freigibt) ??  Nur alle Formeln, sonst nichts ?

Dann werd ich halt damit leben müssen !

jack

[WillWissen]

Hallo Jack,

lade mal deine Datei (ein Arbeitsblatt reicht) mit deinen Formeln und deinen Einstellungen hoch. Sensible Daten vorher anonymisieren. Dann kann nachgesehen werden, wo du den Fehler drin hast.

[Fennek]

Hallo,

(ungeprüft) VBA für ein sheet:

Code:

sub Formeln_schuetzen()
with activesheet.userange
    .cells.locked = false
    .specialcells(3).cells.locked = true
    .protect
end with
end sub

mfg

[happy-jack]

Hallo,

der Code gehört hinter das Blatt, auf dem es wirken soll:

Hi Käptn Blaubär,  (Dein Signaturbild ist prima) :19:

Danke für deine Mühe, hab's noch nicht probiert, wirkt das dann nur auf das Blatt "hinter dem es steht" ?
Ich dachte eher an eine Möglichkeit sofort alle Formeln in der gesamten Mappe (alle 12 Blätter ggf. auch noch mehr) mit einem "Schalter", (evtl auf einem extra Blatt)

Ich habe als Anfänger monatelang an der Mappe gebastelt, nun läuft endlich alles gut und es soll nicht durch eine Unachtsamkeit alles zerschossen werden.  Deshalb will ich ALLE Formeln ohne Ausnahmen schützen, aber Spalten noch in der Breite verändern können usw....

Danke für Deine Hilfe

jack

[Käpt'n Blaubär]

Hallo,

Ich dachte eher an eine Möglichkeit sofort alle Formeln in der gesamten Mappe (alle 12 Blätter ggf. auch noch mehr) mit einem "Schalter", (evtl auf einem extra Blatt)

Ich habe als Anfänger monatelang an der Mappe gebastelt, nun läuft endlich alles gut und es soll nicht durch eine Unachtsamkeit alles zerschossen werden.  Deshalb
will ich ALLE Formeln ohne Ausnahmen schützen, aber Spalten noch in der Breite verändern können usw....

also, der Code, wie ich ihn oben gezeigt habe, wirkt nur in dem einen Blatt. das ist richtig.
Wobei man ihn aber auch hinter jedes Blatt legen kann. Dann wirkt der Code eben auch dort.

Man kann ihn aber auch anpassen und in DieseArbeitsmappe ablegen. Dann kann man
beispielsweise beim Starten der Datei mit einer Schleife alle Tabellenblätter ansprechen, oder
einige Blätter unberücksichtigt lassen, ... oder ... oder ... oder, je nachdem, was meine mehr
oder weniger schmutzige Gesinnung sich einfallen läßt.

Übrigens, den Schalter braucht es dann auch nicht unbedingt, es sei denn man will noch andere
Dinge damit erreichen. Jedenfalls würden Deine Formeln auch alleine durch den Start der Datei
geschützt werden können.

Ach ja, wie Günter (Will Wissen) schon geschrieben hat, eine Beispieldatei wäre von Vorteil.

[happy-jack]

Danke an alle für eure Mühe.

Ich hab' jetzt ganz einfach alle Zellen mit Formeln lindgrün eingefärbt und weiß dadurch dass ich in diesen "lindgrünen  Zellen" nichts rumschreiben darf.

Zudem habe ich entdeckt dass man mit "Suchen" alle Formeln in einem Rutsch markieren kann und dann schützen..... DAS macht das Ganze schon einfacher.   :17:  (und keine Formel geht dabei vergessen)! :28:  


Danke an alle die sich für mich Gedanken gemacht haben !!    !:97:

jack