Yuoさん
回答ありがとうございます。
            For i As Integer = 0 To DataGridView1.Rows.Count - 1 
                sheet.Range("A" & i + 2 & "").Value = DataGridView1.Rows(i).Cells(1).Value
                sheet.Range("B" & i + 2 & "").Value = DataGridView1.Rows(i).Cells(4).Value
                sheet.Range("C" & i + 2 & "").Value = DataGridView1.Rows(i).Cells(5).Value
                sheet.Range("D" & i + 2 & "").Value = DataGridView1.Rows(i).Cells(6).Value
                sheet.Range("E" & i + 2 & "").Value = DataGridView1.Rows(i).Cells(7).Value
            Next
これでできるようになりました！！

後は、細かい修正をしていきたいと思います。ありがとうございました。