diff --git a/Wardrobe/SolidWorks/Model_3D_Fill.vb b/Wardrobe/SolidWorks/Model_3D_Fill.vb
index dde19c2..560c92a 100644
--- a/Wardrobe/SolidWorks/Model_3D_Fill.vb
+++ b/Wardrobe/SolidWorks/Model_3D_Fill.vb
@@ -611,7 +611,7 @@ Public Class Model_3D_Fill
         Dim swApp As SldWorks.SldWorks
         Dim swModel As SldWorks.ModelDoc2
         Dim swAssy As SldWorks.AssemblyDoc
-        Dim CompArray() As SldWorks.Component2
+        Dim CompArray(3) As SldWorks.Component2
         Dim vCompArray
         Dim vIntCompArray
         Dim vIntFaceArray
@@ -624,11 +624,14 @@ Public Class Model_3D_Fill
         Dim components = swAssy.GetComponents(True)
         'CompArray = swAssy.GetComponents(True)
         'For i = 1 To components.length - 1
-        ' CompArray(0) = swAssy.GetComponentByName("Part2^Assem1-1")
+        CompArray(0) = components(0)
+        CompArray(1) = components(1)
+        CompArray(2) = components(2)
+        CompArray(3) = components(3)
         'Next
 
-        vCompArray = components
-        swAssy.ToolsCheckInterference2(components.length, (vCompArray), interfering, vIntCompArray, vIntFaceArray)
+        vCompArray = CompArray
+        swAssy.ToolsCheckInterference2(4, (vCompArray), interfering, vIntCompArray, vIntFaceArray)
 
 
         Dim Bodies(UBound(vIntFaceArray)) As Object