Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Veränderung beliebiger Zellen verhindern

Forumthread: Veränderung beliebiger Zellen verhindern

Veränderung beliebiger Zellen verhindern
05.04.2003 20:40:09
Martin
Hallo,

ich habe verschiedne Sachen gesehen, um Löschen, Verändern etc. von beliebig auswählbaren Zellbereichen zu verhindern, ohne die Nachteile eines permanenten Blattschutzes zu haben. Hat mich alles nicht überzeugt. Nun habe ich mir das hier ausgedacht:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Dim gesperrterBereich As Range
Set gesperrterBereich = Union( _
Range("1:1") _
, Range("A:A") _
, Range("A3:B4") _
)

If Intersect(Target, gesperrterBereich) Is Nothing Then
ActiveSheet.Unprotect Password:="test"
Else
ActiveSheet.Protect Password:="test"
End If

End Sub


Sobald man also eine Zelle in Zeile 1 markiert, oder auch eine ganze Spalte, tritt Blattschutz ein.

Trotzdem kann man zB noch zelle d1 löschen, indem man d5 auswählt, rechts klickt, und Zellen löschen->ganze Spalte ausführt.

Wie, um Himmels willen, kann man das ohne permanenten Blattschutz verhindern?

Martin



Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Veränderung beliebiger Zellen verhindern
05.04.2003 20:55:26
Forum

Hallo Martin

die Lösung mittels VBA bedingt immer das Makros aktiviert wurde. Bei Nein nutzt der SChutz nichts.

Leider hasr Du nicht geschrieben welche Zellen geschützt werden
- Zellen mit Forml
- aus gefüllte Zellen
- Oder ...

Gruß

;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige