Microsoft Excel

Herbers Excel/VBA-Archiv

ein Sheet "unlöschbar" machen

Betrifft: ein Sheet "unlöschbar" machen von: Daniel
Geschrieben am: 13.08.2008 11:11:03

Hallo zusammen!
Hätte mal wieder ne Frage!
kurz zur Info: Ich möchte ein Sheet in einer Arbeitsmappe per Mako unlöschbar, unbeschreibbar etc. machen und das ganze auch wieder aufheben....
Das mit dem unbeschreibbar geht auch ganz gut mit ThisWorkbook.Sheets(2).Protect password:="xxxxx".
Nur wie bekomme ich das hin per Makro, das ein Sheet "unlöschbar" wird??
Hat jemand einen Rat?? Es soll nur Sheet(2) mit dem Makro angesprochen werden....
Evtl. Arbeitsmappenschutz nur für ein Sheet?? Hier aber das Problemm, dass alle Tabellenblätter betroffen sind.
Bekomme es nicht wirklich hin!

Merci schon mal im voraus!
Gruß Daniel


  

Betrifft: AW: ein Sheet "unlöschbar" machen von: Rudi Maintaire
Geschrieben am: 13.08.2008 11:25:49

Hallo,

Bekomme es nicht wirklich hin!


das geht auch nicht.

Gruß
Rudi


  

Betrifft: AW: ein Sheet "unlöschbar" machen von: Matthias G
Geschrieben am: 13.08.2008 11:42:01

Hi zusammen,

um es zu präzisieren:
das geht nicht ohne VBA.

Gruß Matthias


  

Betrifft: AW: ein Sheet "unlöschbar" machen von: Daniel
Geschrieben am: 13.08.2008 11:49:04

Hallo Matthias!
Und wie würde das mit Vba aussehen?
Hättest du mir einen Befehl oder Quellcode oder sonst einen Ansatz??
Wäre super spitze

Gruß Daniel


  

Betrifft: AW: ein Sheet "unlöschbar" machen von: Matthias G
Geschrieben am: 13.08.2008 12:06:50

Hallo Daniel,

Im Prinzip so, dass das Arbeitsblatt grundsätzlich geschützt ist und relevante Befehle, die der Anwender ausführen darf (Blatt löschen, hinzufügen, verschieben) nur über Makro möglich gemacht werden, indem man den Arbeitsmappenschutz aufhebt, die Befehle ausführt und anschließend den Schutz wieder setzt.

Gruß Matthias


  

Betrifft: AW: ein Sheet "unlöschbar" machen - Korrektur von: Matthias G
Geschrieben am: 13.08.2008 12:18:22

Hi Daniel,

ich meinte natürlich:
m Prinzip so, dass die Arbeitsmappe grundsätzlich geschützt ist...

Gruß Matthias


  

Betrifft: AW: ein Sheet "unlöschbar" machen - Korrektur von: Daniel
Geschrieben am: 13.08.2008 13:00:27

Hallo Matthias!
Wie wäre der Befehl um Arbeitsmappenschutz aufzuheben??
Den Blattschutz hebe ich ja mit: Workbooks(Dateiname).Sheets(2).Unprotect password:="xxxx" auf!
Wie hebe ich aber dann den Arbeitsmappenschutz auf??
Vielen Dank schon mal für deine Antworten...

Gruß Daniel


  

Betrifft: AW: ein Sheet "unlöschbar" machen - Korrektur von: Hoffi
Geschrieben am: 13.08.2008 13:24:51

Hallo,

Workbooks("DeinMappenName").Protect "DeinPasswort"



Grüße Hoffi


  

Betrifft: AW: ein Sheet "unlöschbar" machen von: Franc
Geschrieben am: 13.08.2008 14:54:59

Du kannst etwas nicht löschbar machen genauso wenig wie du es nicht hinbekommen wirst, das keiner etwas machen kann was du nicht willst. Wir reden hier von MS Excel ...

Über Makro gehts erst recht nicht, weil alles was du darüber sperren lassen willst, kann man umgehen indem man keine Makros zuläßt. Man kann zwar gewisse Dinge erschweren bzw. erzwingen aber komplett verhindern ist unmöglich.


 

Beiträge aus den Excel-Beispielen zum Thema "ein Sheet "unlöschbar" machen"