title: VBA Macro: Trying to code "if two cells are the same, then nothing, else shift rows down"
body: <p><strong>My Goal:</strong> To get all data about the same subject from multiple reports (already in the same spreadsheet) in the same row.</p>
  
  <p><strong>Rambling Backstory:</strong> Every month I get a new datadump Excel spreadsheet with several reports of variable lengths side-by-side (across columns).  Most of these reports have overlapping subjects, but not entirely.  Fortunately, when they are talking about the same subject, it is noted by a number. This number tag is always the first column at the beginning of each report.  However, because of the variable lengths of reports, the same subjects are not in the same rows.  The columns with the numbers never shift (report1's numbers are always column A, report2's are always column G, etc) and numbers are always in ascending order.</p>
  
  <p><strong>My Goal Solution:</strong>  Since the columns with the ascending numbers do not change, I've been trying to write VBA code for a Macro that compares (for example) the number of the active datarow with from column A with Column G.  If the number is the same, do nothing, else move all the data in that row (and under it) from columns G:J down a line.  Then move on to the next datarow.</p>
  
  <p><strong>I've tried:</strong> I've written several "For Each"s and a few loops with DataRow + 1 to and calling what I thought would make the comparisons, but they've all failed miserably.  I can't tell if I'm just getting the syntax wrong or its a faulty concept.  Also, none of my searches have turned up this problem or even parts of it I can maraud and cobble together.  Although that may be more of a reflection of my googling skill :)</p>
  
  <p><strong>Any and all help would be appreciated!</strong></p>
  
  <p>Note: In case it's important, the columns have headers.  I've just been using DataRow = Found.Row + 1 to circumvent.  Additionally, I'm very new at this and self-taught, so please feel free to explain in great detail</p>