Alternative zu Schutz

Forumthread: Alternative zu Schutz
4 Beiträge zu diesem Forumthread
Anzeige

Forumthread: Alternative zu Schutz

02.02.2007 00:11:14

Lars

Hi,
ich kann keinen Blattschutz verwenden.
Wie kann ich dennoch verhindern, dass die Werte in Spalte A
überschreiben werden können?
Grüße Lars

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Alternative zu Schutz

02.02.2007 00:34:29

K.Rola
Klasse, danke! oT

02.02.2007 15:54:00

Lars
Mit einer Ereignisprozedur wie...

02.02.2007 00:37:16

Luc:-?
AW: Alternative zu Schutz

02.02.2007 23:38:23

Daniel

AW: Alternative zu Schutz

02.02.2007 00:34:29

K.Rola

Hallo,
das geht z.B. so:
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Column = 1 Then
Application.EnableEvents = False
Application.Undo
Application.EnableEvents = True
End If
End Sub
Allerdings kannst du dann in Spalte A nix mehr ändern.
Wenn du etwas Neues eintragen willst, musst du den Code
im Modul der entsprechenden Tabelle auskommentieren oder löschen.
Keyboard not found, press F8 to continue or any key to abort!

Klasse, danke! oT

02.02.2007 15:54:00

Lars

Mit einer Ereignisprozedur wie...

02.02.2007 00:37:16

Luc:-?

...SelectionChange, Lars.
Gruß Luc :-?

AW: Alternative zu Schutz

02.02.2007 23:38:23

Daniel

Hallo
für diesen Fall gibts auch noch eine andere Schutzmöglichkeit ohne VBA (hat allerdings einen kleinen Haken)
1. Menülleiste für "Steuerelemente" aktivieren
2. dort auf Button "Eigenschaften" klicken
3. bei der Eigenschaft "ScrollAerea" folgendes Eintragen: $B:$IV
damit kann der Anwender nicht mehr in die Spalte A klicken und somit auch nichts mehr veränderen.
kleines Problem dabei ist, wenn die Spalte A einmal aus dem Bild gescrollt ist, kann sie nicht wieder zurückgeholt werden, dazu muss erst die Eigenschaft "ScrollAerea" wieder auf blank gesetzt werden.
man kann dieses Verhalten allerdings verhindern, wenn man unter FENSTER-FIXIEREN die Spalte A fixiert.
Dann ist sie allerding immer sichtbar.
Gruß,Daniel

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!