Code	        Description	Default	Value	Unit	Group
mSeqL	        Sequenzlänge	8	8	Schmelzen	Giessen
mT_Restranding	Umrüstdauer	60	60	Minuten	Giessen
mT_StartB1	Start Korb 1	6	6	Minuten	Steuerung
mT_StartB2	Start Korb 2	8	8	Minuten	Steuerung
mC101	        LS -> LC EAF	HM123	HM123	Kran	Kranzuordnung
mC102	        LC EAF -> LC LF	HM456	HM456	Kran	Kranzuordnung

	Private Sub TreeView_AfterSelect(ByVal sender As Object, ByVal e As _
  System.Windows.Forms.TreeViewEventArgs) Handles TreeView.AfterSelect
		For Each obj As Object In myBS.List
			If Main.Grid_Report(e.Node.Text, obj) Then
				DataGridView.Rows.Add(obj)
			End If
		Next
	End Sub

	Public Function Grid_Report(ByVal Tree_NodeText As String, ByVal obj As _
  Object) As Boolean
		If Tree_NodeText = CType(obj, Macros).Group Then
			Return True
		Else
			Return False
		End If
	End Function