Schreibschutz der aktiven Mappe aufheben bei Makro
Fabio
Beim öffnen meiner Excel-Datei startet ich automatisch ein Userform
Private Sub Workbook_Open()
UserForm4.Show
End Sub
auf diesem Userform erschein folgender Hinweis:
"Bitte löschen Sie einzelne Artikel nur mit der zu Verfügung stehenden Eingabemaske"
Diese Eingabemaske ermöglicht nach der Eingabe einer beliebigen Artikelnummer, das Löschen eines bestimmten Artikels (mit samt den zusätzlichen Angaben (= ganze Zeile)).
Die Eingabmaske wird über einen Button in der Symbolleiste gestartet. Kann ich nun mein Dokument so (schreib-)schützen, daß ein direktes löschen (d.h. "klick" in eine Zelle und lösche) nicht möglich wird, sondern AUSSSCHLIESSLICH über die von mir programmierte Eingabemaske?
Habe von thommyh. schon den tip mit
activesheet.protect
activesheet.unprotect
bekommen, aber irgendwie scheint mir das nicht das richtige (der Warnhinweis der von Excel erscheint, möchte ich z.b. nicht angezeigt bekommen).
Wer von Euch weiß Rat?
Grüße und Danke für Eure Hilfe
FABIO
Anzeige