make the following the code behind the userform. I assume that the active
sheet has data in column A starting at row 2.
I also assume the form has four command buttons ( cmdFirst, cmdPrev,
cmdNext, cmdLast) as one textbox called RowNumber.
I called a long variable LastRow, and the use the form's Initialise event to
get this from the table and set the RowNumber textbox to the first row.

Option Explicit
Private LastRow As Long
Private Sub UserForm_Initialize()
   LastRow = Range("A2").End(xlDown).Row
   RowNumber = 2
End Sub

Private Sub cmdFirst_Click()
   RowNumber.Text = "2"
   GetData
End Sub

Private Sub cmdPrev_Click()
   Dim r As Long
   If IsNumeric(RowNumber.Text) Then
       r = CLng(RowNumber.Text)
       r = r - 1
       If r > 1 And r <= LastRow Then
           RowNumber.Text = FormatNumber(r, 0)
       End If
   End If
   GetData
End Sub
Private Sub cmdNext_Click()
   Dim r As Long
       If IsNumeric(RowNumber.Text) Then
       r = RowNumber
       If r < LastRow Then
           r = r + 1
       Else
           r = LastRow
       End If
   RowNumber = r
   GetData
   End If
End Sub
Private Sub cmdLast_Click()
   RowNumber = LastRow
   GetData
End Sub
Private Sub cmdSave_Click()
   
End Sub

Private Sub RowNumber_Change()
   GetData
End Sub
Private Sub DisableSave()
   cmdSave.Enabled = False
   cmdClose.Enabled = False
End Sub
Private Function GetData()
   ' some code here to populate controls
End Function