Find next empty row for automatic data entry from excel userform -


private sub commandbutton1_click()  nextrow = 2  sheets("data").cells(nextrow, 2) =  sheets("data").cells(nextrow, 3) = sheets("sheet1").cells(nextrow, 2)  sheets("data").cells(nextrow, 4) = thisworkbook.sheets("sheet1").range("b3")  sheets("data").cells(nextrow, 5) = thisworkbook.sheets("sheet1").range("b4")  sheets("data").cells(nextrow, 6) = thisworkbook.sheets("sheet1").range("b5")  sheets("data").cells(nextrow, 7) = thisworkbook.sheets("sheet1").range("b6")  sheets("data").cells(nextrow, 8) = thisworkbook.sheets("sheet1").range("b7")  sheets("data").cells(nextrow, 9) = thisworkbook.sheets("sheet1").range("b8")  sheets("data").cells(nextrow, 10) = thisworkbook.sheets("sheet1").range("b10")  sheets("data").cells(nextrow, 11) = thisworkbook.sheets("sheet1").range("b11")  sheets("data").cells(nextrow, 12) = thisworkbook.sheets("sheet1").range("b12") end sub 

here code. whenever keep on giving value overrides. how change it? how make entry in seperate row?

you pop little loop in discover next empty row, example (untested!):

nextrow=2 until sheets("data").cells(nextrow,2) = ""     nextrow = nextrow + 1 loop 

Comments

Popular posts from this blog

jquery - How can I dynamically add a browser tab? -

keyboard - C++ GetAsyncKeyState alternative -

android - java.net.UnknownHostException(Unable to resolve host “URL”: No address associated with hostname) -