Spreadsheet teilweise sperren Fehlermeldung
20.11.2005 13:06:42
Peter S.
mit nachstehendem Code möchte ich, dass die entsprechenden Felder nicht betätigt werden können, jedoch bringt er eine Fehlermeldung, dass die Locked-Eigenschaft des Range-Objektes nicht festgelegt werden kann.
Private Sub Spreadsheet1_KeyPress(ByVal KeyAscii As Long)
Dim iRow As Integer, iCol As Integer
For iRow = 10 To 40
For iCol = 3 To 7
Cells(iRow, iCol).Locked = True
Next iCol
Next iRow
End Sub
Wer kann da bitte helfen?
Vielen Dank
Peter S.
Anzeige