'Calculates Heightoverall
Select Case Anzahl_Schubladen
Case 1
Gesamthöhe = Fronthöhe_01+Holzdicke_03+4
Case 2
Gesamthöhe = Fronthöhe_01+Fronthöhe_02+Holzdicke_03+6
Case 3
Gesamthöhe = Fronthöhe_01+Fronthöhe_02+Fronthöhe_03+Holzdicke_03+8
End Select
'iLogicVb.UpdateWhenDone = True
'InventorVb.DocumentUpdate()