Zellen sichern



Excel-Version: 10.0 (Office XP)
nach unten

Betrifft: Zellen sichern
von: Florian
Geschrieben am: 05.07.2002 - 04:47:20

Kann ich Zellen sichern, so das man zwar neu Daten eintragen kann, aber nicht eventuelle Formeln veraendert?

Thanks-a-lot!


nach oben   nach unten

Re: Zellen sichern
von: Hajo_Zi
Geschrieben am: 05.07.2002 - 07:35:24

Hallo Florian

falls nur eine Zelle gewählt wird und die Spalten bis IV gefüllt sind bzw. Spalte IV hat keine Formeln. Könnte man sich mit folgendem Code in VBA in die Tabelle helfen.


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.HasFormula Then Cells(Target.Row, Target.Column + 1).Select
End Sub

Eine andere Möglichkeit wäre der Blattschutz, aber damit gibt es auch gleich Einschränkungen z.B. bei der Formatierung.

Gruß Hajo


nach oben   nach unten

Re: Zellen sichern
von: Hajo_Zi
Geschrieben am: 05.07.2002 - 07:42:52

Hallo Florian

bzw. Folgender Code falls mehr als eine Zelle markiet wird


Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
    Dim Z
'   überprüfen ob mehr als eine Zelle markiert $A$1:$B$3
'   wurde mehere Zellen markiert ist wert größer 0
    If InStr(Target.Address, ":") = 0 Then
        If Target.HasFormula Then Cells(Target.Row, Target.Column + 1).Select
    Else
'       es wurden mehere Zellen markiert
        For Each Z In Selection
            If Z.HasFormula Then
                Cells(Z.Row, Z.Column + 1).Select
                Exit For
            End If
        Next Z
    End If
End Sub

Gruß Hajo

nach oben   nach unten

Re: Zellen sichern
von: Florian
Geschrieben am: 05.07.2002 - 07:55:56

Danke fuer die Muehe, aber es tut sich nichts. Wenn ich Werte eingebe verschwinden die Formeln.
Hmm..

nach oben   nach unten

Re: Zellen sichern
von: Hajo_Zi
Geschrieben am: 05.07.2002 - 08:01:39

Hallo Florian

hast Du den Code auch an die richtige Stelle kopiert. Nicht Modul, nicht Diese Arbeitsmappe sondern Tabelle???


Gruß Hajo


nach oben   nach unten

Natuerlich nicht...
von: Florian
Geschrieben am: 08.07.2002 - 00:17:25

...das wird's sein!
Danke! Werd's gleich probieren...

 nach oben

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