HERBERS Excel-Forum - das Archiv
Arbeitsblatt nur mit Userform bearbeiten
Thorsten

Hallo Experten,
ich habe eine Excelliste dich ich ausschließlich über Userform fülle.
Der grund hierfür ist dass viele Leute in die liste eintragen die keine Computer bzw. excelkenntnisse haben.
Jeder sollte jedoch die Excelliste anschauen können.
Wenn ich nun den Blattschutz rein mache damit keine was verhauen kann, kann man auch nicht mehr mit Userform eintragen.
Hat jemand ne Idee wie ich das Blatt bzw. die mappe schützen kann aber dennoch über userform eintragen kann?
Danke im vorraus

AW: Arbeitsblatt nur mit Userform bearbeiten
Bertram

Hallo Thorsten,
setze die ShowModal-Eigenschaft des UF auf True, dann kann ja keiner in die Tabelenblätter schreiben solange dein UserForm aktiv ist. Beim Schließen des UF kannst du dann die jeweiligen Blätter schützen.
Gruß
Bertram

AW: Arbeitsblatt nur mit Userform bearbeiten
Rudi

Hallo,
diesen code 1x laufen lassen:


Sub tt()
With ActiveSheet
.Unprotect "passwort"
.Protect Password:="passwort", userinterfaceonly:=True
End With
End Sub


Eintragungen nur noch über VBA möglich.
Gruß
Rudi
Eine Kuh macht Muh, viele Kühe machen Mühe

AW: Arbeitsblatt nur mit Userform bearbeiten
Thorsten

Hallo rudi,
wo muss ich den Code eintrage?
In jede Userform?
Und muss ich dann zuerst den Blattschutz mit "passwort" schützen.
Danke

AW: Arbeitsblatt nur mit Userform bearbeiten
Erich

Hallo Thorsten,
schau mal z. B. hier (gefunden bei Suche nach Userform geschützt):
https://www.herber.de/forum/archiv/472to476/t473678.htm
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort

AW: Arbeitsblatt nur mit Userform bearbeiten
Thorsten

Erst mal danke für die Zusendungen.
Ich hab das ganze nun so gemacht dass ich beim klicken auf den "anlegen" button (also sowas wie ein OK button)
Den Schutz deaktivier mit
ActiveSheet.Unprotect Password:="passwort"
Anschliessend kommen die normalen if abfragen oder was auch immer die Userform macht.
am Schluss dann wieder
ActiveSheet.Protect Password:="passwort"
End Sub
Muss man bei jeder Userform extra eingeben aber ich hab ja nur 10 Stück.
Danke für die hilfe