Hi, forgive my poor coding, as I haven't learnt VBA at all. How do I
ger rowendrange and nowrow to return the cell range instead of the
cell value?

Dim rowend As String
Dim rowendrange As Range
Dim nowrow As Range
Dim lastrow As Range

If Me.TextBox1.Value = "" Then
rowend = 0
Else
rowend = Me.TextBox1.Value
End If

rowendrange = ActiveCell.Offset(rowend, 0).Range
nowrow = ActiveCell.Offset(0, -2).Range

Me.TextBox2.Value = nowrow
Me.TextBox3.Value=rowendrange

Thanks in advance

Rich