Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1272to1276
1272to1276
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zellinhalt ändern nur für bestimmte User

Forumthread: Zellinhalt ändern nur für bestimmte User

Zellinhalt ändern nur für bestimmte User
Uwe
Hallo zusammen,
jep, der schon wieder...
Anhängig vom angemeldeten User in Windows soll es nur bestimmten Usern (2) möglich sein, mit einfachem Mausklick eben ihre UserID aus Windows in eine Zelle (z.B. B5) eines Arbeitsblattes einzutragen. Alle anderen User (3) sollten einen Hinweis (MsgBox?) zur fehlenden Berechtigung erhalten, danach aber "normal" weiter arbeiten können.
Denke mal, das eine derartige Lösung nur über VBA zu realisieren ist? Irgendwo gab`s doch hier mal genau diese Lösung...?
Für sachdienliche Hinweise, für des Rätsels Lösung bin ich seeehr dankbar.
Gruß
Uwe
Anzeige
AW: Zellinhalt ändern nur für bestimmte User
22.07.2012 17:02:37
Hajo_Zi
Hallo uwe,
Dir ist schon klar das nichts in Excel sicherv ist.
Zeige den Code zum auslesen der UserID, der Rest ist eine Kleinigkeit.

AW: Zellinhalt ändern nur für bestimmte User
22.07.2012 17:08:37
Uwe
Hallo Hajo,
die in/mit Excel gebotene Sicherheit reicht in dem Fall völlig aus!!! Es geht hier eher um unbeabsichtigte, wenn auch gut gemeinte Änderungen, die einfach nur bestimmten Usern gestattet sind. Diesen Code zum Auslesen der User ID hatte ich mal. Dieser ist mir leider, leider verloren gegangen....
So gesehen brauchte ich hier dann doch die "Komplettlösung". Sonst würde ich gerne die schon vorbereitete Datei beifügen. Aber so, leider.... Fehlanzeige.
Gruß Uwe
Anzeige
AW: Zellinhalt ändern nur für bestimmte User
22.07.2012 17:13:33
Hajo_Zi
Hallo Uwe,
Zum Schutz vor Änderungen reicht doch der Tabellenschutz.
Gruß Hajo
AW: Zellinhalt ändern nur für bestimmte User
22.07.2012 17:21:52
Matze,Matthias
Hallo Uwe,
und du kannst z.B.: deiner fertigen Datei bei "speichern unter" Tools / Allgemeine optionen ein
Passwort zum öffnen deiner Datei vergeben.
Matze
Anzeige
AW: Zellinhalt ändern nur für bestimmte User
22.07.2012 18:02:58
JoWE
Hallo Uwe,
ich weiß nicht warum Deine einfache Frage nicht einfach beantwortet wurde.
Es ist aber ganz einfach z.B. über einen CommandButton zu realisieren: 
Private Sub CommandButton1_Click()
[B5] = Application.UserName
End Sub

Gruß
Jochen
Anzeige
AW: Zellinhalt ändern nur für bestimmte User
22.07.2012 18:03:06
JoWE
Hallo Uwe,
ich weiß nicht warum Deine einfache Frage nicht einfach beantwortet wurde.
Es ist aber ganz einfach z.B. über einen CommandButton zu realisieren: 
Private Sub CommandButton1_Click()
[B5] = Application.UserName
End Sub

Gruß
Jochen
Anzeige
AW: Zellinhalt ändern nur für bestimmte User
22.07.2012 18:40:06
Hajo_Zi
Hallo Jochen,
das ist der eingetragene Benutzer in Excel, ich vermute das ist nicht die "UserID aus Windows"
Gruß Hajo
AW: Stimmt! Geht aber trotzdem...
22.07.2012 20:20:02
JoWe
... mit 
Private Sub CommandButton1_Click()
[B5] =  Environ("Username")
End Sub
Danke für den Hinweis Hajo
Gruß
Jochen
Anzeige
AW: Stimmt! Geht aber trotzdem...
22.07.2012 20:23:49
Hajo_Zi
Hallo Jochen,
das ist der Anmeldename in Windows. Es war aber gefordert "UserID aus Windows"
was das auch sein mag.
Gruß Hajo
AW: Stimmt! Geht aber trotzdem...
23.07.2012 04:59:28
Uwe
Hallo zusammen, mit anderen Worten: Morgääähn...
Jochens Vorschlag ist genau der, den ich gesucht habe. Hinweis für Hajo:
UserID aus Windows ist nichts anderes als der Anmeldename in Windows!
Danke,
Uwe
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Zellinhalt ändern nur für bestimmte User

Schritt-für-Schritt-Anleitung

  1. Öffne deine Excel-Datei und drücke Alt + F11, um den VBA-Editor zu öffnen.

  2. Füge ein neues Modul hinzu:

    • Klicke auf "Einfügen" > "Modul".

  3. Kopiere den folgenden VBA-Code in das Modul:

    Private Sub CommandButton1_Click()
   If Application.UserName = "User1" Or Application.UserName = "User2" Then
       [B5] = Application.UserName
   Else
       MsgBox "Du hast keine Berechtigung, diese Zelle zu ändern.", vbExclamation
   End If
End Sub

  4. Füge einen CommandButton zu deinem Arbeitsblatt hinzu:

    • Gehe zurück zu deinem Arbeitsblatt und klicke auf "Entwicklertools" > "Einfügen" > "Button".

  5. Verknüpfe den Button mit dem VBA-Code, indem du den Namen des Buttons wählst und auf "Zuordnen" klickst.

  6. Speichere die Datei als Makro-fähige Excel-Datei (.xlsm).

Häufige Fehler und Lösungen

  • Fehler: MsgBox wird nicht angezeigt.

    • Lösung: Stelle sicher, dass die Benutzername-Bedingungen im Code korrekt sind. Vergewissere dich, dass die Namen in Application.UserName genau mit den erwarteten Benutzern übereinstimmen.

  • Fehler: Zelle B5 wird nicht aktualisiert.

    • Lösung: Prüfe, ob der Button korrekt mit dem VBA-Code verknüpft ist. Stelle auch sicher, dass Makros aktiviert sind.

Alternative Methoden

Wenn du eine Excel-Datei nur für bestimmte Benutzer freigeben möchtest, kannst du auch den Tabellenschutz verwenden. Hier ist wie:

  1. Wähle die Zelle oder den Bereich aus, den du schützen möchtest.
  2. Klicke auf "Überprüfen" > "Blatt schützen".
  3. Lege ein Passwort fest, um Änderungen zu verhindern.
  4. Du kannst spezifische Benutzerrechte einstellen, sodass nur autorisierte Benutzer Änderungen vornehmen können.

Praktische Beispiele

  • Beispiel 1: Du möchtest, dass nur User1 und User2 den Inhalt in Zelle B5 ändern können. Die oben genannten Schritte und der VBA-Code sind dafür ideal.

  • Beispiel 2: Du hast eine Excel-Datei, die sensible Daten enthält. Durch das Einrichten eines Passworts beim Speichern kannst du sicherstellen, dass nur die richtigen Benutzer Zugriff haben.

Tipps für Profis

  • Nutze Environ("Username"), um den Windows-Benutzernamen abzurufen, falls du spezifische Anforderungen für die UserID hast.

  • Dokumentiere deine VBA-Codes gut, damit du in Zukunft leichter verstehen kannst, was jeder Abschnitt macht.

  • Teste deine Makros regelmäßig, um sicherzustellen, dass sie unter verschiedenen Benutzerkonten wie gewünscht funktionieren.

FAQ: Häufige Fragen

1. Kann ich diesen Code auch in Excel 2016 verwenden?
Ja, der VBA-Code funktioniert in Excel 2016 sowie in neueren Versionen.

2. Was passiert, wenn ein nicht autorisierter Benutzer auf die Datei zugreift?
Wenn du die Datei mit einem Passwort schützt, wird der Benutzer beim Öffnen aufgefordert, das Passwort einzugeben. Wenn er es nicht hat, hat er keinen Zugriff auf die Datei.

3. Wie kann ich sicherstellen, dass der Code auch nach Änderungen funktioniert?
Es ist wichtig, den Code regelmäßig zu überprüfen, insbesondere nach größeren Änderungen an der Datei oder den Benutzerkonten.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige