Seiteninhalt
Makros
In der Software MBT-RAT sind folgende Makros enthalten:
- change_language
- add_remove_rows
- FormControl
- Sub ShowFormSettings()
- Norm_list
- read_log
- Table_RiskAssessment
- Formular FormSettings
- Private Sub CommandButtonApply_Click()
- Private Sub CommandButtonCancel_Click()
- Private Sub CommandButtonDeleteLog_Click()
- 6 x Private Sub CommandButtonxxxAll_Click()
- 6 x Private Sub CommandButtonxxxNone_Click()
- Private Sub UserForm_Initialize()
Hinweis:
Sollten Sie der Datei nicht vertrauen, oder die Datei aus einer anderen Quelle zugeschickt bekommen, überprüfen Sie bitte die in der Datei enthaltenen Makros.
Die von uns programmierten Makros greifen auf keine externen Daten zu. Im Zweifel vergleichen Sie bitte eine Datei von einer anderen Quelle mit unserer Originaldatei.
Sub Select_Language()
Dieses Makro steuert die Sprachauswahl.
Wenn Sie neue Sprachen einfügen, können sie hier den Quellcode 2 mal unter:
'Put the current select Picture in the Back, so we see which language is active and which is hidden
'also, move the pictures around
'if you enter more languages, put more pictures...
'Pictures from Microsoft.com
anpassen, um Ihre Flaggen mitzubewegen. Ansonsten ändert sich die Flaggenfolge nicht, bis nicht wieder Deutsch ausgewählt ist.
Sub Neue_Zeile()
Dieses Makro fügt eine Zeile ein und kopiert die wichtigsten Eigenschaften der Zeile darüber.
Sub Zeile_Löschen()
Dieses Makro prüft, ob die markierte Zeile löschbar ist und warnt dann noch einmal vor Datenverlust. Danach wird die Zeile gelöscht.
Sie können die Zeilen natürlich auch "per Hand" löschen, sind dann aber nicht vor Fehlbedienung geschützt.
Sub Create_Standard_list()
Dieses Makro kopiert die verwendeten Normen aus dem Tabellenblatt "Risikobeurteilung" in das Blatt "Projektdaten" und löscht Mehrfachnennungen. Damit haben Sie einfach eine Liste von angewandten Normen. Welche Sie davon komplett einhalten müssen Sie aber noch selber entscheiden.
Private Sub Worksheet_Change(ByVal Target As Range)
Dieses Makro überwacht die Tabelle Table_RiskAssessment auf Änderungen in den Zellen.
Entsprechend der geänderten Zellen kann
- Sub Enter_All_Lifecycles
oder - Sub Stop_Hazard_is_done
ausgelöst werden.
Zusätzlich wird immer
- Sub Log_Changes
- Sub Set_Date_of_Lastchange
ausgeführt.
Sub Enter_All_Lifecycles(Target As Range) in Table_RiskAssessment
Dieses Makro füllt die Lebensphasen mit "x" auf, wenn "Alle" mit "x" oder "X" belegt ist.
Wir haben dies über ein Makro geregelt, um zu vermeiden, dass Formeln durch Überschreiben gelöscht werden und es bei späteren Anpassungen Ihrer Daten zu Problemen kommt.
Sub Stop_Hazard_is_done(Target As Range) in Table_RiskAssessment
Dieses Makro überwacht die letzte Spalte. Wenn Sie hier angeben, dass Sie die Spalte fertig bearbeitet haben, wird geprüft
- ob die Risikominderung bewertet wurde
und bei erforderlicher weiterer Minderung
- ob Sie eine Haupt- und Unternummer vergeben haben
und - ob Sie die Folgemaßnahme angelegt haben
Dies soll Sie davor schützen, dass Sie Zeilen "Abhaken" in denen noch Aufgaben offen sind.
Sub Log_Changes(Target As Range) in Table_RiskAssessment
Dieses Makro
- Überträgt die Änderung in das Blatt "Risikobeurteilung Log"
- Hängt Nutzer und Datum an die übertragene Änderung
- Trägt eine Zuordnung in die Reihe und Spalte der Änderung ein, falls diese noch nicht vorhanden ist.
Über die Zuordnung ist gewährleistet, dass die Historie auch nach Umsortieren der Tabelle erhalten bleibt.
Sub Set_Date_of_Lastchange(Target As Range) in Table_RiskAssessment
Dieses Makro überprüft ob etwas in der Tabelle Risikobeurteilung geändert wurde. In diesem Fall wird automatisch das Datum der letzten Änderung angepasst.
Wenn beim Ändern das Datum der letzten Änderung der Zeile mit geändert wird, wird dieses Makro nicht ausgelöst. Damit haben Sie die Chance, dieses Datum manuell anzupassen.
Sub Read_RiskAssessment_Log()
Dieses Makro sucht zu der ausgewählten Zelle die entsprechende Zelle in "Risikobeurteilung Log" und zeigt sie in einer Nachricht an.
Sub Clear_RiskAssessment_Log()
Dieses Makro löscht den Inhalt des Blattes "Risikobeurteilung Log" sowie die Zuordnung, die im Blatt "Risikobeurteilung" erstellt wurde. Damit sind alle Spuren der Änderungen beseitigt.