Passwörter bei Excel :: Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office

Einloggen, um private Nachrichten zu lesen

Downloads

[Excel 2000] Passwörter bei Excel

Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office Foren-Übersicht » Microsoft Excel Hilfe

Autor

Nachricht

derhornist
Besserwisser

Anmeldedatum: 14.03.2006
Beiträge: 70

Verfasst am: 20.03.2008, 13:05

Hallo,
hier eine neue Frage:
Ich möchte eine Excel- Tabelle. Diese Tabelle soll durch z.B. 3 Personen bearbeitet werden. Jede Person soll ein eigenes Passwort für die Bearbeitung erhalten. Die bearbeitende Person soll hinter jeder Zeile die sie geändert hat ihren Namen schreiben. Allerdings soll in dieser Zelle dann NUR der Name der eingeloggten Person zulässig sein. Quasi wie eine Unterschrift.
Ist so etwas mit Excel überhaupt möglich?

Danke

schatzi
Moderator

Anmeldedatum: 09.12.2006
Beiträge: 5520

Verfasst am: 20.03.2008, 13:35

Hallo!

Als Ansatz:

Code:

Private Sub Workbook_Open()
Dim Nutzer$, Pass$
Nutzer = InputBox("Bitte geben Sie Ihren Namen ein:")
Pass = InputBox("Geben Sie Ihr Passwort ein:")
With Tabelle1.Range("E:E").Validation
If _
(Nutzer = "Müller" And Pass = "xxx") Or _
(Nutzer = "Meier" And Pass = "yyy") Or _
(Nutzer = "Schulze" And Pass = "zzz") Then
.Delete
.Add Type:=xlValidateList, Formula1:=Nutzer
Else
.Delete
.Add Type:=xlValidateCustom, Formula1:="anonym"
End If
End With
End Sub

_________________

Viele Grüße vom Schatzi
------------------------
Dies ist meine Signatur und sie trägt eigentlich nichts zur Lösung deines Problems bei. Sollte sie es dennoch tun, dann bist du definitiv im falschen Forum...

Ein Feedback zum ursprünglichen Problem wäre trotzdem nett!
Windows XP, Office2000, Office2007

derhornist
Besserwisser

Anmeldedatum: 14.03.2006
Beiträge: 70

Verfasst am: 20.03.2008, 14:21

Hallo,
vielen Dank für mal wieder schnelle Hilfe.
Ich habe den Code eingefügt. Wenn ich die Datei öffne wird zwar gefragt ob ich Makros aktivieren möchte, die Abfrage nach Namen und Passwort kommt dann allerdings nicht.
Der Code wird doch auf in Module z.B. Modul1 eingefügt. Oder?

Danke

schatzi
Moderator

Anmeldedatum: 09.12.2006
Beiträge: 5520

Verfasst am: 20.03.2008, 14:26

Hallo!

Nein!
Dieser Code gehört ins Modul "DieseArbeitsmappe".

Ein Feedback zum ursprünglichen Problem wäre trotzdem nett!
Windows XP, Office2000, Office2007

derhornist
Besserwisser

Anmeldedatum: 14.03.2006
Beiträge: 70

Verfasst am: 20.03.2008, 14:35

Supi, vielen Dank.

derhornist
Besserwisser

Anmeldedatum: 14.03.2006
Beiträge: 70

Verfasst am: 31.03.2008, 13:08

Hallo,

wie kann ich das jetzt anstellen, dass ich mehrere Tabellenblätter überwache. D.h. ich gebe zu Anfang den Nutzer und das Passwort ein und dieser Nutzer kann dann auf jedem Tabellenblatt (Sagen wir mal 9 Stück) immer in der gleichen Spalte nur seinen Namen eintragen?

Danke

Uwe

schatzi
Moderator

Anmeldedatum: 09.12.2006
Beiträge: 5520

Verfasst am: 31.03.2008, 13:18

Hallo!

Ungetestet:

Code:

Private Sub Workbook_Open()
Dim Nutzer$, Pass$, Blatt As Worksheet
Nutzer = InputBox("Bitte geben Sie Ihren Namen ein:")
Pass = InputBox("Geben Sie Ihr Passwort ein:")
For Each Blatt In ThisWorkbook.Worksheets
With Blatt.Range("E:E").Validation
If _
(Nutzer = "Müller" And Pass = "xxx") Or _
(Nutzer = "Meier" And Pass = "yyy") Or _
(Nutzer = "Schulze" And Pass = "zzz") Then
.Delete
.Add Type:=xlValidateList, Formula1:=Nutzer
Else
.Delete
.Add Type:=xlValidateCustom, Formula1:="anonym"
End If
End With
Next Blatt
End Sub

Ein Feedback zum ursprünglichen Problem wäre trotzdem nett!
Windows XP, Office2000, Office2007

derhornist
Besserwisser

Anmeldedatum: 14.03.2006
Beiträge: 70

Verfasst am: 31.03.2008, 15:40

Vielen Dank, werde es mal testen.

Gruß

derhornist
Besserwisser

Anmeldedatum: 14.03.2006
Beiträge: 70

Verfasst am: 02.04.2008, 10:26

Danke, klappt wunderbar.

Gruß

Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office Foren-Übersicht » Microsoft Excel Hilfe

Thema		Autor	Forum	Antworten	Verfasst am
Ähnliche Beiträge
	Benötige Excel Formel	Kannnix	Microsoft Excel Hilfe	0	30.08.2008, 13:05
	plötzlich keine summenberechnung mehr...	globus111	Microsoft Excel Hilfe	3	29.08.2008, 10:32
	Excel Tabelle aktualisiert sich auf D...	Dioxid123	Microsoft Excel Hilfe	4	28.08.2008, 10:43
	Daten aus Formular in Excel-Datei spe...	Christoph	Microsoft Excel Hilfe	7	25.08.2008, 20:37
	Excel Diagramm einteilen	Haintz	Microsoft Excel Hilfe	1	24.08.2008, 13:47

Gehe zu:

Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht 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 posten
Du kannst Dateien in diesem Forum herunterladen

Powered by phpBB © 2001, 2002 phpBB Group :: FI Theme :: Alle Zeiten sind GMT + 1 Stunde
Deutsche Übersetzung von phpBB.de