Excel Programming

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I need help with a function... I'm trying to enter several data
entries(integers) from a 'User Form' into a range of cells. The entries need
to go from (B44:j79) one at a time - clearing the entry from the 'User Form'
[textbox] after each entry. I can get the data in the first cell (B44), but
it will not advance to the next cell down - or clear the entry after I hit
the <enter> key. Here is what I have already:

Private Sub TextBoxEnterData_Change()

Worksheets(2).Select

For Each Cell In Worksheets("Data Sheet").Range("b44:j79")
Range("B44").Value = TextBoxEnterData.Value

If Cell.Value < 0# Then
Cell.Value = Null
End If

Next Cell

End Sub

Can you please help me out??

Thanks!
 
You can't cledar the textbox after each one, else you will just fill the
arry (apart from th first cell) with nothing.

Private Sub TextBoxEnterData_Change()
For Each Cell In Worksheets("Data Sheet").Range("b44:j79")
cell.Value = TextBoxEnterData.Value
Next Cell
TextBoxEnterData.Value

End Sub
 
The line

Range("B44").Value = TextBoxEnterData.Value

needs to be

Cell.Value = TextBoxEnterData.Value
 
Back
Top