10.3.17 Zellenschutz
Stellt den Schutzstatus einer Calc-Zelle ein. Achtung die Tabelle selber darf nicht geschützt sein.

sub Zellschutz(myCell as Object, gesperrt as boolean, formelhidden as boolean,ausblenden as boolean,druck as boolean)
   Dim myProtection As New com.sun.star.util.CellProtection
   myProtection.IsLocked=gesperrt
   myProtection.IsFormulaHidden=formelhidden
   myProtection.IsHidden=ausblenden
   myProtection.IsPrintHidden=druck
   myCell.CellProtection=myProtection
end sub