Option Explicit
Sub Workbook_Open()
	BelastungsBerechnung.Show
End Sub