Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
660to664
660to664
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Blattschutz aufheben aus TextIndex 010498

Forumthread: Blattschutz aufheben aus TextIndex 010498

Blattschutz aufheben aus TextIndex 010498
02.09.2005 14:00:41
Jürgen
Hi, habe aus dem o.g. Index das Makro übernommen,
leider gibt es eine Fehlermeldung "Laufzeitfehler #13# Typen unverträglich"
Habe im File-Upload mal eine Bildschirm-Kopie beigefügt,
https://www.herber.de/bbs/user/26268.xls
kann mir vielleicht jemand sagen was ich falsch mache!!
Muss jetzt leider weg, kann erst am Montag antworten!!
Besten Dank an alle die helfen können.
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Blattschutz aufheben aus TextIndex 010498
02.09.2005 18:43:32
serge
Hi Jürgen
wenn es der Blatschutz sein soll versuchs mal so:

Sub blattschutzausein()
'Alle Tabellen-Blattschutz ausschalten
For Each WsTabelle In Sheets
WsTabelle.Unprotect password:="pass"
Next WsTabelle
'Alle Tabellen-Blattschutz einschalten
For Each WsTabelle In Sheets
WsTabelle.Protect password:="pass"
Next WsTabelle
End Sub

Serge
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige