How to select next empty cell in row for a specific range?

Hi

I have a spreadsheet with with 8 columns and unlimited rows which needs to be filled in.
How can I modify my current code so that when i press enter it goes to the next empty cell in row until the column 8 ("H") then to the next row?

Currently this code only does column "A" and "B" - I need to "H"

Private Sub Worksheet_Change(ByVal Target As Range)

Dim erow As Long

erow = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Offset(1, 1).Row

If Cells(erow - 1, 1).Offset(0, 1) = "" Then

Cells(erow - 1, 1).Offset(0, 1).Select

Else: Cells(erow, 1).Select

End If
End Sub