I am using this code to put the value of EPLCRef1TextBox & "-"
EPLCRef2TextBox into the next empty cell in column "C" starting at Ro
10.

Private Sub AuditDetailsCompleteCommandButton_Click()
With Worksheets("DUMP")
Application.ScreenUpdating = False

Range("C" & Rows.Count).End(xlUp).Offset(1, 0).Select
If Selection.Row < 10 Then Range("A10").Select
ActiveCell.Value = EPLCRef1TextBox & "-" & EPLCRef2TextBox
End With
Application.ScreenUpdating = True
End Sub

I then want to add the contents of UseThis1TextBox to the next cell o
the Right and todays Date into the cell next to that. I also want to ad
a few more TextBox Values to the right of this.

Can someone please tell me how to do this in VBA.

Cheer

--
Message posted from http://www.ExcelForum.com