Seite 1 von 1

Re: ClearContents

Verfasst: Fr, 06.08.2010 13:07
von komma4
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?