1.1k Aufrufe
Gefragt in Tabellenkalkulation von patejoker Einsteiger_in (53 Punkte)
Guten Abend liebe Gemeinde ;)

Ich möchte gerne folgendes umsetzen.

Nach dem ich auf eine Zelle in der Spalte D einen Namen eingetragen habe soll sich ein PopUp öffnen in dem ich anklicken kann was der Mitarbeiter erhalten hat.

z.B Taschenrechner, Papier, Ausweis, Drucker oder oder. insgesammt 6 Sachen.

Wenn ich diese ausgewählt habe soll der Name in der Zelle bleiben.

Wenn der Mitarbeiter nun später nochmals wieder kommt klicke ich auf die Zelle in der Spalte F und bevor ich da wiederrum einen Namen einfügen kann soll sich das PopUp wieder öffnen und ich muss anklicken welche Sachen er abgibt.

Erst wenn alle Sachen die er bekommen hat auch wieder als Abgegeben makiert sind soll eine eingabe in die Zelle der Spalte F erlaubt sein.

Ist das überhaupt möglich?

Und wenn ja wie.

(PS: in meiner Tabelle binden sich schon einige VBA befehle: ziehe :
Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Column = 1 Then 'Wenn Änderung in Spalte1 (A)
Application.EnableEvents = False 'falls irgendwann Spalte2 etwas auslösen soll
Target.Offset(0, 1).Value = Format(Now, "hh:mm:ss") 'Schreibe ein Spalte nach rechts (B) die Zeit
Application.EnableEvents = True 'Events wieder ein
Target.Offset(0, 3).Select 'selectiere 3. Zelle nach rechts (D)
End If 'ENDE Änderung in Spalte1 (A)

If Target.Column = 5 Then 'Wenn Änderung in Spalte4 (D)
Target.Offset(1, -4).Select 'selectiere Zelle ein Zeile runter, 3Spalten links
End If 'ENDE Änderung in Spalte4 (D)

If Target.Column = 3 Then 'Wenn Änderung in Spalte3 (C)
MsgBox "Hat der Mitarbeiter alles abgegeben?", vbQuestion, "Wichtige Frage:" 'MessageBox
Target.Offset(0, 3).Select 'selectiere 3. Zelle nach rechts (F)
End If 'ENDE Änderung in Spalte3 (C)

If Target.Column = 6 Then 'Wenn Änderung in Spalte6 (F)
Target.Offset(1, -5).Select 'selectiere Zelle ein Zeile runter, 3Spalten links5
End If 'ENDE Änderung in Spalte6 (F)

End Sub


Es sollte also anstelle der Message Box die Abfrage Checkbox erscheinen ;)

3 Antworten

0 Punkte
Beantwortet von patejoker Einsteiger_in (53 Punkte)
Ich weiß ihr habt auch noch andere Sachen zu tun mein Frage ist nur geht es überhaupt oder warte ich vergebends auf eine Lösung ;)
0 Punkte
Beantwortet von coros Experte (4k Punkte)
Hallo Namenloser,

das was Du schreibst wird schon realisierbar sein. Was ich mich jetzt aber Frage, hast Du bereits eine Datei, in der die Anfänge realisiert wurden? Gibt es da schon eine UserForm, in der die CheckBoxen eingearbeitet sind, mit denen man dann die einzelnen Artikel anklicken kann? Wenn es diese gibt, warum stellst Du uns die nicht zur Verfügung. Es ist keiner sehr erbaut, wenn er Deine Datei versuchen muss nachzubauen, die Du bereits erstellt hast. Also lade die Datei z.B. bei http://www.file-upload.net/ hoch und teile uns den Link, den Du erhälst hier mit.
Wenn in der Datei noch keine UserForm mit Checkboxen usw. vorhanden ist, dann kannst Du mal auf meiner meiner HP in der Rubrik Anleitungen und dort dann in der Anleitungsnummer 10 (Anleitung zum Erstellen einer UserForm ) nachschauen. Dort stelle ich dazu eine bebilderte Anleitung zur Verfügung, die Dir sicherlich helfen wird.

Dann die Frage, wo werden denn die Daten der ausgewählten Artikel eingetragen, die die Person sich ausgeliehen hat?

Das alles sind Informationen, die man benötigt um Dir eventuell helfen zu können.

MfG,
Oliver
[sub]Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du[/sub]
[sup] ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.[/sup]
0 Punkte
Beantwortet von patejoker Einsteiger_in (53 Punkte)
Erst mal vielen Dank für die Antwort, nein ein UserForm ist noch nicht drin, werde am Wochenende mich mal ransetzen und die Datei weiter machen , und Sie dann mal hochladen ;)
...