Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
304to308
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
304to308
304to308
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Probleme mit unprotect

Probleme mit unprotect
07.09.2003 12:38:25
Raik Reinhöfer
Hallo warum funktioniert das nicht einwandfrei was ich da gemacht habe?


Private Sub CommandButton1_Click()
Sheets("Stammdaten").Select
ActiveSheet.Unprotect
Range("L4").Value = Date
ActiveSheet.Protect
End Sub


Wenn ich diesen Code per Klick auf den Button1 aufrufe gibt es folgenden Absturz: in der Zeile: ActiveSheet.Unprotect

Laufzeitfehler: '1004':
Die Unprotect-Methode des Worksheet-Objektes ist fehlerhaft.

Wenn ich den obigen Code aber aus der Entwicklungsumgebung ausführe gibt es i.d.R. keinen Absturz. (Manchmal stürzt er aus unerklärlichen Gründen auch hier ab.)

Was kann ich tun?

Für Eure Hilfe schon mal besten Dank im voraus.

Gruß Raik

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Probleme mit unprotect
07.09.2003 12:40:20
andreas e
hallo raik,
kann es sein, das der fehler auftaucht wenn das sheet bereits keinen schutz mehr hat ?
Gruß
Andreas E

http://www.skripteundaufgaben.de
viele kostenlose Downloads und Links zu EXCEL und mehr
AW: Probleme mit unprotect
07.09.2003 12:49:02
Raik Reinhöfer
Achtung: Office 97

Danke Dir, ist aber nicht an dem.

Wenn das sheet bereits keinen schutz mehr hat kommt der Fehler beim Schützen.

Laufzeitfehler: '1004':
Die Unprotect-Methode des Worksheet-Objektes ist fehlerhaft.

in der Zeile: ActiveSheet.Protect

Wer kann Sich nun hierdrauf einen Reim bilden.

Danke und Gruß Raik
Anzeige
AW: Probleme mit unprotect
07.09.2003 13:02:11
Hajo_Zi
Hallo Raik

das es sein das Du ein CommandButton in der Tabelle has. In VBA kann zu 99% auf select usw verzichtet werden.


Private Sub CommandButton1_Click()
With Sheets("Stammdaten")
.Unprotect
.Range("L4").Value = Date
.Protect
end With
End Sub



Falls Code vorhanden wurde dieser getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte kein Mail, Probleme sollen im Forum gelöst werden.

Microsoft MVP für Excel

Das Forum lebt auch von den Rückmeldungen.

Zurzeit gibt es wieder Probleme mit der E-Mail Benachrichtigung.

Ich bekomme Mails zu Beiträgen an denen ich nicht beteiligt bin und zusätzlich noch Mails zu meinen eigenen Beiträgen.
Das Problem mit den eigenen Benachrichtigung kann gelöst werden durch Lösche und Neuanmelden. Dieses möchte ich aber nicht jeden Tag machen.
Um dieses Problem erstmal zu beseitigen habe ich die automatische Mailbenachrichtigung abgeschaltet.
Aus diesem Grunde ist es dem Zufall überlassen ob auf Rückfragen Antworten von mir kommen.
Anzeige
AW: Probleme mit unprotect
07.09.2003 13:18:40
Raik Reinhöfer
Hallo Hajo,

danke für deine Antwort. Bin langsam ratlos - stürzt weiter bei .protect bzw .unprotect ab.

Hab es jetzt auch einfach mal in einem standardmodul: Modul1 probiert.
weil ich das im Exel-FAQ so gesehen habe.
--> ging aber auch nicht

Ich habe jetzt einfach mal die datei zum server hoch geladen (Ich hoffe das ist ok.) Vielleicht kann man da den Fehler finden.

Die Datei https://www.herber.de/bbs/user/906.xls wurde aus Datenschutzgründen gelöscht


Danke und Gruß Raik
AW: Probleme mit unprotect
07.09.2003 13:23:15
andreas e
hallo raik,
habe gerade mal mit deiner mappe meinen und den code von Hajo getestet -
beide funzen einwandfrei, jedoch ist der von hajo wesentlich eleganter und sauberer.
Gruß
Andreas E

http://www.skripteundaufgaben.de
viele kostenlose Downloads und Links zu EXCEL und mehr
Anzeige
AW: Probleme mit unprotect
07.09.2003 13:35:24
Hajo_Zi
Hallo Raik

ich vermute mal Deine Datei hat einen Fehler. Bei den ersten beiden öffnungen wurde das VBA Projekt entfernt. ann lief der Code "Sub Schutz_Stammdaten()" Fehlerfrei.

https://www.herber.de/bbs/user/909.xls


Falls Code vorhanden wurde dieser getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte kein Mail, Probleme sollen im Forum gelöst werden.

Microsoft MVP für Excel

Das Forum lebt auch von den Rückmeldungen.
AW: Probleme mit unprotect
07.09.2003 14:37:43
Raik Reinhöfer
Hallo,

danke - mein excel scheint wahrscheinlich nicht ok zu sein.
Ich habe das mit dem schützen / freigeben in einer vollkommen neuen Arbeitsmappe
probiert. Auch hier ging es nicht.

Vielleicht weißt du ja nen weg wie ich die Arbeitsmappe schützen kann, so daß VBA trotzdem in die geschützten Felder schreiben kann.

Danke und Gruß Raik
Anzeige
AW: Probleme mit unprotect
07.09.2003 14:46:39
Hajo_Zi
Hallo Raik

das ist doch wohl der falsche Ansatz, ich würde Excel in Ordnung bringen. Entweder Deinstallation und Installation oder

Excel wieder auf neu setzen
Start - Ausführen,
Eingeben: "C:\Programme\Microsoft Office\Office\excel.exe" /regserver
Den Officepfad musst Du anpassen, die Anführungszeichen müssen mit eingegeben werden
pfad\excel.exe /o - re-registrieren und dabei nur fehlende der ungültige Einträge ersetzen. Excel wird danach gleich gestartet.
pfad\excel.exe /regserver - vollständig neu registrieren. Excel wird nicht gestartet
bei XP
"C:\Programme\Microsoft Office\Office10\excel.exe" /regserver

Gebe in Windows unter Start/Ausführen die Zeile
"LW:\Pfad\excel.exe" /unregserver
ein und anschließend dann
"LW:\Pfad\excel.exe" /regserver



Falls Code vorhanden wurde dieser getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte kein Mail, Probleme sollen im Forum gelöst werden.

Microsoft MVP für Excel

Das Forum lebt auch von den Rückmeldungen.
Anzeige
AW: Probleme mit unprotect noch offen !
07.09.2003 13:02:18
andreas e
hallo raik,
habe es gerade nochmals getestet - bei mir läuft es problemlos ! allerdings arbeite ich auch mit office 2000 - maybe .....
kann es leider nicht anders testen
gruß
andreas e

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige