Nur eine Frage.
Kann man das Blatt so schützen, daß man die Eingabe in eine Zelle
ändern kann, aber die ganze Zeile nicht löschen kann ?
Das sollte auch unter Office 97 laufen.
Gruss Erich
Sub Zelle_loeschen_aktivieren()
Dim moeglichkeit1, moeglichkeit2
For Each moeglichkeit1 In Application.CommandBars.FindControls(ID:=292)
moeglichkeit1.Enabled = True
Next
For Each moeglichkeit2 In Application.CommandBars.FindControls(ID:=30003)
moeglichkeit2.Enabled = True
Next
End Sub
Sub Zelle_loeschen_deaktivieren()
Dim moeglichkeit1, moeglichkeit2
For Each moeglichkeit1 In Application.CommandBars.FindControls(ID:=292)
moeglichkeit1.Enabled = False
Next
For Each moeglichkeit2 In Application.CommandBars.FindControls(ID:=30003)
moeglichkeit2.Enabled = False
Next
End Sub