Ablaufform mit VBA steuern
13.10.2021 13:42:34
Werner
bei einigen VBA-Aufgaben benötige ich Hilfe, ich komme mit meinem VBA-Halbwissen nicht weiter.
Die Arbeitsmappe habe ich hochgeladen, so wird vielleicht verständlich was ich erreichen möchte. Das Passwort lautet "Ja", der Code zur AM: https://www.herber.de/bbs/user/148600.xlsm
Es handelt sich um einen Ablaufplan, in dem feste Texte vorhanden sind. Wenn ein MA eine Aufgabe erledigt hat soll mittels Schaltfläche neben dem Text in Spalte (E) das Datum und sein Kürzel in die Spalte (D) geschrieben werden. Das funktioniert, jedoch nur per Doppelklick auf die Datumszelle.
Die MA dürfen dabei jeweils nur den nächstmöglichen Eintrag bestätigen. Bsp.: wenn Eintrag a) durch einen MA bestätig ist, darf nicht als nächstes Eintrag d) bestätigt werden, die Einträge b) und c) müssen zuvor erledigt sein, usw.
Durch den Button Notiz Zeile 13 darf unter dem festen Wert in Zeile 12 eine Notiz hinzugefügt werden, das funktioniert soweit. Momentan nur für zwei Zeilen aktiviert (gibt es dafür evtl. einen einfacheren Code? Bei 60 Zeilen wird das eine lange Liste).
Die Zeilenhöhe wird dabei automatisch an den Eintrag angepasst.
Jedoch soll auch hier automatisch das aktuelle Datum und sein Kürzel mit Klick auf OK hinzugefügt werden (klappt noch nicht).
Nun kommt es vor, dass Datumseinträge samt Kürzel geändert werden müssen, wenn z.B. ein Kunde eine Änderung mitteilt oder sich Daten des Kunden ändern. Dazu soll nun der ändernde MA das aktuelle Datum samt Kürzel in die jeweilige Zelle in Spalte E und D eintragen. Dass dies nicht versehentlich geschieht, soll das über die Schaltfläche Datum ändern geschehen Hier öffnet sich eine MsgBox, in der gefragt wird ob die Änderung beabsichtigt ist und zusätzlich wird das Passwort (in dem Fall Ja) verlangt.
Jede Änderung des Datums mit Kürzel soll in den Spalten ab M ff hinterlegt sein. Ich gehe von 4 oder max. 5 Änderungen aus. In der Spalte K und L soll das jeweilige Ersterstellerdatum und Kürzel verewigt sein.
Ist das halbwegs verständlich? Habt ihr Tipps für mich?
Vielen Dank schon mal vorab.
VG
Werner