Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 18
Default 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
  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 6,953
Default 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

  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 18
Default 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

  #4   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 468
Default 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

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Finding data between blank rows j.ruderman[_2_] Excel Worksheet Functions 2 September 25th 08 11:48 AM
Userform Entering Data to a spreadsheet nir020 Excel Programming 0 November 16th 06 06:40 PM
userform to search by entering data into a textbox Moh Excel Programming 3 September 13th 06 02:01 PM
Userform finding next row to place data BrianW Excel Programming 1 February 4th 06 09:38 PM
Help finding data from userform bballmama43 Excel Programming 1 August 18th 05 06:12 PM


All times are GMT +1. The time now is 09:26 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"