I use the following code to input data on to a worksheet with a user form.
Everything used to work fine until I changed the cell format of the range
B7:B23 to "text" format. Now every time I enter data using my user form the
new data entry goes on top of the last entry instead of moving down a row.
Any suggestions?



Dim LastRow As Object

Set LastRow = Worksheets("Blend Sheet").Range("B23").End(xlUp)
If Me.ComboBox1.Value < "" And Not IsNull(Me.ComboBox1) And
Me.TextBox2.Value < "" And Not IsNull(Me.TextBox2) Then
LastRow.Offset(2, 0).Value = ComboBox1.Text
LastRow.Offset(2, 5).Value = TextBox2.Text