von komma4 » Fr, 06.08.2010 13:07
Du kannst die unterschiedlichen Bereiche isolieren.
Das geht bspw. über:
Code: Alles auswählen
Sub de40878
oBereiche = ThisComponent.Sheets().getByName( "Aufstellung" ).CellFormatRanges()
For i = 0 to oBereiche.Count - 1
If oBereiche.getByIndex(i).CellProtection.isLocked() = FALSE Then
' mach was
End If
Next i
End Sub
Hilft Dir das?
Du kannst die unterschiedlichen Bereiche isolieren.
Das geht bspw. über:
[code]Sub de40878
oBereiche = ThisComponent.Sheets().getByName( "Aufstellung" ).CellFormatRanges()
For i = 0 to oBereiche.Count - 1
If oBereiche.getByIndex(i).CellProtection.isLocked() = FALSE Then
' mach was
End If
Next i
End Sub
[/code]
Hilft Dir das?