Home Office-Hilfe.com - Wir lösen Ihr Problem mit Microsoft Excel, Word, Outlook, PowerPoint, Access gratis Forum Impressum

 [Excel 2002] Urlaubsliste
Neues Thema eröffnenNeue Antwort erstellen
Autor Nachricht
cedric
Newbie
Newbie


Anmeldedatum: 10.08.2008
Beiträge: 2

BeitragVerfasst am: 10.08.2008, 16:50 Nach oben

Hallo!

Ich möchte eine Urlaubsliste in einen Server stellen mit Einschränkungen. Die Tabelle sollte man auf keinen Fall löschen aber wenn möglich ausdrucken können. Es dürfen nur zwei Leute gleichzeitig auf Urlaub (Zwei Eiträge in einer Spalte z.b.: U). Und das für mich schwierigste jeder Mitarbeiter sollte nur auf seine Zeile einen Zugriff haben.
Wenn jemand eine Lösung weiß, wäre mir sehr geholfen.
Herzlichen Dank im voraus.


Urlaub 2008.xlsx
 Beschreibung:

Download
 Dateiname:  Urlaub 2008.xlsx
 Dateigröße:  85.99 KB
 Heruntergeladen:  43 mal


Urlaub 2008.xlsx
 Beschreibung:

Download
 Dateiname:  Urlaub 2008.xlsx
 Dateigröße:  85.99 KB
 Heruntergeladen:  14 mal

Benutzer-Profile anzeigenPrivate Nachricht senden
schatzi
Moderator
Moderator


Anmeldedatum: 09.12.2006
Beiträge: 5729

BeitragVerfasst am: 10.08.2008, 17:56 Nach oben

Hallo!

Urlaub nur für max. zwei Leute gleichzeitig ist noch relativ einfach:
Markiere den Bereich von B2 bis AF16
Wähle Ribbon Daten > Datentools > Datenüberprüfung
Zulassen: Benutzerdefiniert
Formel: =ZÄHLENWENN(B$2:B$16;"U")<3

Um jedem Mitarbeiter nur seine eigene Zeile freizugeben, könntest du ein WorkbookOpen-Ereignis programmieren, welches automatisch beim Öffnen der Mappe eintritt:
Code:
Private Sub Workbook_Open()
Dim PW As String
PW = InputBox("Bitte geben Sie Ihr Passwort ein:")
With Sheets("Tabelle1")
  'Blattschutz aufheben:
  .Unprotect Password:="Hallo"
  'Alle Zellen sperren:
  .Cells.Locked = True
  'Nun abfragen, welches PW eingegeben wurde
  'und die entsprechende Zeile freigeben.
  Select Case PW
    Case "Name1": .Rows(2).Locked = False
    Case "Name2": .Rows(3).Locked = False
    Case "Name3": .Rows(4).Locked = False
    'usw...
  End Select
  'Blattschutz wieder aktivieren
  .Protect Password:="Hallo"
End With
End Sub

Um das Blatt gegen Löschen zu schützen, könnte dir dieser Link weiterhelfen.

_________________

Viele Grüße vom Schatzi

------------------------
Ich bin nur noch sporadisch erreichbar!
Bitte hofft nicht auf eine schnelle Beantwortung einer Rückfrage meinerseits!
Jeder andere Helfer darf Rückfragen gerne übernehmen und hilft sicher gerne weiter!
Benutzer-Profile anzeigenPrivate Nachricht senden
cedric
Newbie
Newbie


Anmeldedatum: 10.08.2008
Beiträge: 2

BeitragVerfasst am: 10.08.2008, 19:37 Nach oben

Vielen Dank an Schatzi für die Hilfe.
Werde es gleich mal ausprobieren.
Benutzer-Profile anzeigenPrivate Nachricht senden
Beiträge der letzten Zeit anzeigen:      
Neues Thema eröffnenNeue Antwort erstellen


Ähnliche Beiträge
Thema Autor Forum Antworten Verfasst am
Keine neuen Beiträge Tagesstärke/Urlaubsliste gook Microsoft Excel Hilfe 7 06.02.2008, 19:57 Letzten Beitrag anzeigen
Keine neuen Beiträge Urlaubsliste??? Mafiosi Microsoft Excel Hilfe 10 07.11.2006, 16:56 Letzten Beitrag anzeigen


 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

Haftungsausschluss/Disclaimer


SMS kostenlos versenden | Battle-Dream | Tuning Forum | Join the YoungGeneration | krankenversicherungsvergleich | Kalorienarme Rezepte!
Versicherungsvergleich | Bürobedarf | Papier | Betten

Ranking-Hits



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