title: Excel - Making any border that's "xlThick" into "xlMedium"
body: <p>Self Answered...I figured it out.</p>
  
  <pre><code>For CellA = 1 To 20
  For CellB = 1 To 40
      Set Curcell = ActiveSheet.Cells(CellB, CellA)
      Curcell.Select
      For i = 1 To 4
          If i = 1 Then X = "xlEdgeBottom"
          If i = 2 Then X = "xlEdgeLeft"
          If i = 3 Then X = "xlEdgeRight"
          If i = 4 Then X = "xlEdgeTop"
  
           **If Selection.borders(X) = xlThick Then** Selection.borders(X) = xlMedium
  
      Next i
  
     Next CellB
  Next CellA
  </code></pre>
  
  <p>My Goal: if a border is thick, make it medium. All the cells will fall within the range, but they're in multiple sheets. </p>
  
  <p>Why doesn't this work? I have a "type mismatch" at " If Selection.borders(X) = xlThick Then"</p>
  
  <p>I know it's crude but shouldn't it work? What can I do? I have googled but maybe I'm typing in the wrong words.</p>