Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Blattschutz aufheben, Textbox bei falsch eingegebenem Passwo
zurück: Haushaltsbuch weiter: Funktion Produkte Zählen Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Dieses Thema ist gesperrt, du kannst keine Beiträge editieren oder beantworten.     Status: Antwort Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Chris auf Arbeit
Gast


Verfasst am:
08. Sep 2010, 14:03
Rufname:

Blattschutz aufheben, Textbox bei falsch eingegebenem Passwo - Blattschutz aufheben, Textbox bei falsch eingegebenem Passwo

Nach oben
       Version: Office 2003

Hey!

Ich habe ein Makro zum Aufheben eines Blattschutzes. Dieses möchte ich möglichst benutzerfreundlich gestalten. Daher greift das Makro auf eine Zelle xy zu, in der der Endnutzer das Passwort zum Aufheben des Blattschutzes eintragen soll. Integriert habe ich schon eine Textboxmeldung, falls das Passwort in Zelle xy nicht eingegeben wurde. Jetzt würde ich gern noch eine Textbox für den Fall, dass das Passwort falsch eingegeben wurde erhalten.
Bisher kommt natürlich der Fehler:
"Laufzeitfehler '1004': Das eingegebene Kennwort ist ungültig. Stellen Sie sicher, dass die Feststelltaste nicht aktiviert ist und dass Sie die korrekte Groß-/Kleinschreibung verwenden."
Ich würde das eben gern umgehen und statt diesem Fehlerbericht eine Textbox erscheinen lassen.

Vielen Dank für eure Vorschläge.
Grüße,
Chris

P.S.: Ich hatte das Thema schon mal erstellt, aber irgendwie ist es verschwunden... Ich hoffe, das ich nicht doppelt gepostet habe
Jürgen_H
aus Freude an Excel...


Verfasst am:
08. Sep 2010, 14:23
Rufname: Henne
Wohnort: Brüggen Niederrhein

AW: Blattschutz aufheben, Textbox bei falsch eingegebenem Pa - AW: Blattschutz aufheben, Textbox bei falsch eingegebenem Pa

Nach oben
       Version: Office 2003

Hallo Chris,

hilft dir das weiter? Passwort ist hier 123 in Zelle A1.

Code:

Public Sub Blattschutz()
Dim strPasswort

strPasswort = Range("A1")
Select Case strPasswort
  Case ""
    MsgBox "Es wurde kein Passwort eingegeben."
  Case Is <> "123"
    MsgBox "Das eingebebene Passwort ist falsch."
  Case Else
    ActiveSheet.Unprotect Password:=strPasswort
End Select
End Sub


Gruß Jürgen

_________________
Freue mich über eine kurze Rückmeldung.
Thomas Ramel
Microsoft Excel-MVP


Verfasst am:
08. Sep 2010, 16:03
Rufname: Thom
Wohnort: Glashütten - CH


AW: Blattschutz aufheben, Textbox bei falsch eingegebenem Pa - AW: Blattschutz aufheben, Textbox bei falsch eingegebenem Pa

Nach oben
       Version: Office 2003

Grüezi zusammen

Weiter geht es hier:

http://www.office-loesung.de/ftopic409197_0_0_asc.php

_________________
Mit freundlichen Grüssen

Thomas Ramel
[Vista Ultimate SP-1 / xl2007 SP-2]
Neues Thema eröffnen   Dieses Thema ist gesperrt, du kannst keine Beiträge editieren oder beantworten. Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Excel Formeln: Formel WENN = FALSCH 3 lisa=) 392 27. Jan 2009, 21:41
Gast Formel WENN = FALSCH
Keine neuen Beiträge Excel Formeln: Wahr oder Falsch 2 TinaE 577 18. Jan 2009, 19:20
TinaE Wahr oder Falsch
Keine neuen Beiträge Excel Formeln: "Falsch" 8 basell 290 30. Dez 2008, 15:19
< Peter > "Falsch"
Keine neuen Beiträge Excel Formeln: Wenn("-28"<=0; ... ; ...) ===> soll FALSCH s 2 Tigre-Rojo 271 31. Mai 2008, 08:47
Tigre-Rojo Wenn("-28"<=0; ... ; ...) ===> soll FALSCH s
Keine neuen Beiträge Excel Formeln: "Gruppierung aufheben" funktioniert nicht 1 CA 6541 04. Apr 2008, 11:49
CA "Gruppierung aufheben" funktioniert nicht
Keine neuen Beiträge Excel Formeln: DBSumme kalkuliert falsch - Hilfe! 3 AlexandraB 1186 11. Feb 2008, 10:43
urs DBSumme kalkuliert falsch - Hilfe!
Keine neuen Beiträge Excel Formeln: Was ist falsch 6 Forscher 369 08. Dez 2007, 12:31
Gast Was ist falsch
Keine neuen Beiträge Excel Formeln: Was ist falsch? 1 9999 291 13. Nov 2007, 17:20
myfake Was ist falsch?
Keine neuen Beiträge Excel Formeln: Summe falsch berechnet 4 TheCrowXxX 5125 21. Okt 2007, 14:37
TheCrowXxX Summe falsch berechnet
Keine neuen Beiträge Excel Formeln: SVERWEIS soll nicht FALSCH sondern nächste Zeile ausgeben 2 Roland2007 1402 12. Okt 2007, 10:15
Roland2007 SVERWEIS soll nicht FALSCH sondern nächste Zeile ausgeben
Keine neuen Beiträge Excel Formeln: Was ist hier falsch???? 5 Fips88 400 18. Sep 2007, 10:13
Fips88 Was ist hier falsch????
Keine neuen Beiträge Excel Formeln: Verknüpfungen in Excel - Blattschutz 0 LWJ24 877 10. Sep 2007, 16:25
LWJ24 Verknüpfungen in Excel - Blattschutz
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Web Editor Forum