Zellen nicht editierbar

Bild

Betrifft: Zellen nicht editierbar
von: Joachim Dallinger
Geschrieben am: 25.09.2003 08:34:08

Hallo zusammen,

ich möchte in einem Arbeitsblatt Zellen so schützen daß diese nicht ausgewählt werden können, also beim bewegen in der Tabbele einfach übersprungen werden.
Wie läßt sich das in VBA einrichten.

Bild


Betrifft: AW: Zellen nicht editierbar
von: GerdW
Geschrieben am: 25.09.2003 09:48:00

enableselection = xlnoselection

Gerd


Bild


Betrifft: AW: Zellen nicht editierbar
von: Joachim Dallinger
Geschrieben am: 25.09.2003 11:25:21

Hallo Gerd,

danke für die Antwort.
Doch komme ich damit noch nicht richtig klar.
wie muß der genau befehl aussehen für z.B. den Zellenbereich A1:C21


Bild


Betrifft: AW: Zellen nicht editierbar
von: GerdW
Geschrieben am: 25.09.2003 12:18:50

Der Zellbereich ist nicht so wichtig. Das betrifft alle Zellen,
bei denen unter Format|Schutz das Häkchen bei Schutz gesetzt ist.

Gerd


Bild


Betrifft: AW: Zellen nicht editierbar
von: Joachim Dallinger
Geschrieben am: 25.09.2003 14:27:51

Hallo Gerd,

ich habs anscheinend noch nicht begriffen,

Ich lassen folgenden Befehl beim öffnen ausführen


Private Sub Workbook_Open()
EnableSelection = xlNoSelection
End Sub


und habe die Zellen Schreibgeschütz.

Ich kann aber nach wie vor in die Zelle springen und erhalte beim versuch den Inhalt zu ändern wie üblich eine Fehlermeldung.

Ich möchte jedoch das die entsprechenden zellen erst garnicht ausgewählt werden können.


Bild


Betrifft: AW: Zellen nicht editierbar
von: GerdW
Geschrieben am: 25.09.2003 14:49:52

Die Syntax muss natürlich stimmen, hatte bei VBA- Level gut vorausgesetzt,
dass du das in die reihe bekommst. Schau ggf, mal in die Hilfe, da
ist das erklärt.

Gerd


Bild


Betrifft: Ergänzung...
von: GerdW
Geschrieben am: 25.09.2003 12:20:17

Diese Art Schutz wird n i c h t gespeichert, muss also z.B.
beim Öffnen der Mappe immer neu gesetzt werden.

Gerd


 Bild

Beiträge aus den Excel-Beispielen zum Thema " Zellen nicht editierbar"