title: Trying to remove duplicates without messing up the border
body: <p>I am trying to remove duplicates without messing up the border. I have some code already written, but when I try it, it either messes up the border or clears data out of its range.</p>
  
  <p>I just want to compare the list of drawings that I have without going out of the specified range or messing up the border</p>
  
  <p>Sub DelDupl()</p>
  
  <pre><code>Dim rng As Range
  Set rng = Range("A13:F305")
  
  Range("A13").CurrentRegion.RemoveDuplicates Columns:=Array(3, 4), Header:=xlYes
  
  
  With rng.Borders
      .LineStyle = xlContinuous
      .Color = vbBlack
      .Weight = xlThin
  End With
  End Sub
  </code></pre>
  
  <p>I would like to compare the document identifier column with the sheet column, if there is a match, then to delete the respective row.</p>
  
  <p>I have attached a picture below. I just want to compare data starting at row 14. When I run my code it will also delete the "Digital file" text seen in row 11.
  <a href="https://i.stack.imgur.com/cMz4x.jpg" rel="nofollow noreferrer"><img src="https://i.stack.imgur.com/cMz4x.jpg" alt="enter image description here"></a></p>