![]() |
Finding blank row and entering data in row from userform
I'm building a userform for test data entry that currently asks for 22 pieces
of information. I'm trying to take that information and enter it into the next blank row in the spreadsheet. This seems like a rather basic task, but I'm struggling. Please help! Thanks! Mark |
Finding blank row and entering data in row from userform
blankrow = cells(rows.count,"A").End(xlup).offset(1,0).row
uses column 1 to find the next blank cell. Adjust to suit. -- Regards, Tom Ogilvy "MAWII" wrote: I'm building a userform for test data entry that currently asks for 22 pieces of information. I'm trying to take that information and enter it into the next blank row in the spreadsheet. This seems like a rather basic task, but I'm struggling. Please help! Thanks! Mark |
Finding blank row and entering data in row from userform
Thanks, Tom. The problem I'm having is the next step. Having found the next
blank row, now how do I enter data into that row? "Tom Ogilvy" wrote: blankrow = cells(rows.count,"A").End(xlup).offset(1,0).row uses column 1 to find the next blank cell. Adjust to suit. -- Regards, Tom Ogilvy "MAWII" wrote: I'm building a userform for test data entry that currently asks for 22 pieces of information. I'm trying to take that information and enter it into the next blank row in the spreadsheet. This seems like a rather basic task, but I'm struggling. Please help! Thanks! Mark |
Finding blank row and entering data in row from userform
In a standard module include:
Sub Foo() Dim blankrow As Long blankrow = Cells(Rows.Count, "A").End(xlUp).Offset(1, 0).Row ' Toms line Range("A" & blankrow).Value = "something" 'Adjust to suit End Sub Jim "MAWII" wrote: Thanks, Tom. The problem I'm having is the next step. Having found the next blank row, now how do I enter data into that row? "Tom Ogilvy" wrote: blankrow = cells(rows.count,"A").End(xlup).offset(1,0).row uses column 1 to find the next blank cell. Adjust to suit. -- Regards, Tom Ogilvy "MAWII" wrote: I'm building a userform for test data entry that currently asks for 22 pieces of information. I'm trying to take that information and enter it into the next blank row in the spreadsheet. This seems like a rather basic task, but I'm struggling. Please help! Thanks! Mark |
All times are GMT +1. The time now is 08:22 AM. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com