Do Loop
 

I need help with the following VB Excel Do Loop Statement:
In lame men terms

Private Sub CommandButton1_Click()
Range = Row
Do while €˜the cell in row 1 is empty

If €˜the cell is empty then
Select the cell and drop Text Box1 information (From A User form) in to the
empty cell
(Like €œA10€� ) and Text Box2 Information into the cell next to it. (Like
€œB10€�).
Else

Row +1

Loop

End if
End if

End Sub

Thank you very much for any Feedback. Please Also include, If okay, a E-Mail
Address for possible further Questions.