Hi-
Im using the following code to find the next empty cell in column "ac" and then listbox1 - listbox9 will list data from a userform in the cells to the right of column "ac".
For Each c In Worksheets("sheet1").Range("ac1:ac10000")
If c.Value = TextBox10.Text Then
c.Offset(0, 1).Value = TextBox1.Text
c.Offset(0, 2).Value = TextBox2.Text
c.Offset(0, 3).Value = TextBox3.Text
c.Offset(0, 4).Value = TextBox4.Text
c.Offset(0, 5).Value = TextBox5.Text
c.Offset(0, 6).Value = TextBox6.Text
c.Offset(0, 7).Value = TextBox7.Text
c.Offset(0, .Value = TextBox8.Text
c.Offset(0, 9).Value = TextBox9.Text
'End If
'Next c
All the data list using the offset method as it should, however I have to tell wich row to list it in by directing the row# in listbox10. The user wont be able to see which nextrow is not being used, so I need some help on finding the first blank cell in column "ac". Thanks
Im using the following code to find the next empty cell in column "ac" and then listbox1 - listbox9 will list data from a userform in the cells to the right of column "ac".
For Each c In Worksheets("sheet1").Range("ac1:ac10000")
If c.Value = TextBox10.Text Then
c.Offset(0, 1).Value = TextBox1.Text
c.Offset(0, 2).Value = TextBox2.Text
c.Offset(0, 3).Value = TextBox3.Text
c.Offset(0, 4).Value = TextBox4.Text
c.Offset(0, 5).Value = TextBox5.Text
c.Offset(0, 6).Value = TextBox6.Text
c.Offset(0, 7).Value = TextBox7.Text
c.Offset(0, .Value = TextBox8.Text
c.Offset(0, 9).Value = TextBox9.Text
'End If
'Next c
All the data list using the offset method as it should, however I have to tell wich row to list it in by directing the row# in listbox10. The user wont be able to see which nextrow is not being used, so I need some help on finding the first blank cell in column "ac". Thanks