title: VBA Loop one sheet to the next
body: <p>I have two sheets, "Data 1" where I have all my data, "Schedule 1" where it is a form that needs to be filled out. 
  What I want to do is go through each row in "Data 1" and place the value of column E into column C in "Schedule 1" sheet then save just the "Schedule 1" sheet. Then repeat the process until all lines are done. This is what I have so far, I am a bit stuck on what to do next.</p>
  
  <pre><code>   Public Sub CopyRows()
          Dim SaveSheet As Worksheet
          Sheets("Data1").Select
          ' Find the last row of data
          FinalRow = Cells(Rows.Count, 1).End(xlUp).row
          ' Loop through each row
          For x = 2 To FinalRow
  
          'Code here. How can I go through all the rows in "Data 1" and place the value of column E into column C in "Schedule 1"
  
       'Save just the sheet
      Set SaveSheet = ActiveWorkbook.Worksheets(Data1)
  
       SaveSheet.SaveAs FilePath, xlXMLSpreadsheet
       SaveSheet.Name = SheetName 'I would like to put the name of values in Column A from "Data 1" sheet
  
  
          Next x
      End Sub
  </code></pre>