why doesn't my code copy Textbox2 value??

[redspanna]

HI all,

I have this code that simply copies the values input in Textbox1 and Textbox2 on next available row in the 'songs' sheet

Private Sub CommandButton1_Click()
Dim iRow As Long
Dim ws As Worksheet
Set ws = Worksheets("songs")

'find first empty row in database
iRow = ws.Cells(Rows.Count, 2) _
  .End(xlUp).Offset(1, 0).Row

'check for a part number
If Trim(Me.TextBox1.Value) = "" Then
  Me.TextBox1.SetFocus
  MsgBox "Please enter Artist Name"
  Exit Sub
End If

'copy the data to the database

ws.Cells(iRow, 3).Value = Me.TextBox1.Value
ws.Cells(iRow, 2).Value = Me.TextBox2.Value

Me.TextBox1.Value = ""
Me.TextBox2.Value = ""
MsgBox "New Track added, thanks!"


End Sub

but the Textbox2 value isn't being copied -- why ??

many thanks

 

[nigelk]

Silly question I know but have you got two text boxes on your form?

It will error out on this line if you haven't:

ws.Cells(iRow, 2).Value = Me.TextBox2.Value

Otherwise it works fine for me.

Nigel.

 

[redspanna]

Hi,

Yep def have two Textboxes on the form and no error is displayed ie the code runs fine, but it just doesn't copy the value in textbox2 to the worksheet

 

[nigelk]

Have you checked the names are correct?

You haven't deleted a box and then added another so now it's really 'textbox3' or something?

 

[redspanna]

I have just re-created a new userform using the same code and the same happens only Textbox1 is copied !!

 

[nigelk]

That's very odd.

All I did was to create a form, add two textboxes and a button, and copied your code into it. It worked fine for me.

Can anyone else help?

Thanks.

 

[redspanna]

I'm sooooooo sorry, I have just spotted my mistake........

The code works just fine.......I had the column that Textbox2 was being copied to hidden.!!!!!!!!

PLEASE accept my apologies for this rather embarrassing 'error'

But thanks for your help anyway !

 

[Norie]

redspanna

I did exactly the same as nigelk did and didn't have any problems.

The only strange thing I found was that if I didn't enter anything in the first textbox, but something in the 2nd textbox data was still transferred to the ws.

Do you have any other code?

 

[Norie]

redspanna

Don't apologise or whatever - we all make these mistakes.

I just wish there was a 'I'll get my coat smillie'.