Passwort kann ausgelesen werden

Hallo zusammen!

Nebenbei bemerkt, die auswählbaren Levels bezüglich der eigenen Kenntnisse sind irgendwie nicht ausreichend. Ich habe mal das ausgewählt, was am ehesten passt.

Nun zu meinem Problem.
Meine Datei selber ist passwortgeschützt.
Zum Sortieren mancher Tabellen in dieser Datei benutze ich Makros. Dazu ist es notwendig, dass der Passwortschutz zeitweise aufgehoben wird, weil ich mit Filtern arbeite. Dieses erledigt das Makro gleich mit und setzt nach dem Sortieren den Schutz wieder ein.
Leider ist es jetzt so, dass derjenige, der den Makroeditor öffnet, meine Makros sehen kann und somit das darin enthaltene Passwort sieht.

Kennt jemand eine Möglichkeit für mich, den Makroeditor mit einem Passwort zu schützen oder eine andere Art mein Passwort zu schützen?

Und noch etwas ganz anderes: gibt es eigentlich eine Möglichkeit oder ein Programm, welches ermöglicht, dass eine Exceldatei zu einer eigenen Anwendung wird? Ich habe mal gehört, dass das bei Access möglich sein soll.

Vielen Dank im Voraus!

Erdogan

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hallo Dieter,

auch dir herzlichen dank für die schnelle Antwort!
Dein Vorschlag für meine zweite Frage bringt mich vielleicht weiter. Könntest du mir noch detailierte Infos geben?

Ich weiß nicht, ob ich dich richtig verstanden habe. Ich versuche kurz zu erklären, wie ich es mache:

Ich habe mehrere Excelsheets. In diesen sind Tabellen enthalten.
Diese werden per S-Verweis gefüllt. Die Daten kommen aus einer Art Datenbank.
Diese Tabellen haben alle einen Autofilter. Bei einem Klick auf eine bestimmte Schaltfläche wird ein bestimmtes Worksheet aufgerufen und die darin enthaltene Tabelle mit dem Autofilter sortiert. Dabei werden die Daten nach bestimmten Kriterien sortiert.
Mein Problem war es, dass dieser Autofilter nur funktioniert, wenn der Blattschutz nicht aktiv ist. Deshalb habe ich in das Makro, welches ein Worksheet aufruft und die Daten sortiert, die Deaktivierung des Blattschutzes eingebaut. Dieses Makro deaktiviert den Blattschutz, sortiert die Daten und stellt den Blattschutz wieder ein.
Ich hoffe ich konnte dir weiterhelfen.

Nachfolgend der Code für dieses Makro:


Sub Daten sortieren()
Sheets("A1").Select
Sheets("A1").Unprotect Password:="deinPasswort"
Selection.AutoFilter Field:=7, Criteria1:="x"
Sheets("A1").Protect Password:="deinPasswort"
Range("H1").Select
End Sub

Field:=7 ---- Das ist die Spalte, nach der sortiert werden soll.
Criteria1:="x" ---- Für x setzt du ein, wonach Excel sortieren soll.

Viele Grüße

Erdogan

Beliebteste Forumthreads (12 Monate)

7 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

7
Beiträge zum Forumthread

Beiträge zu diesem Forumthread