Very new to VBA, so this is probably a simple question.
I want to find the first non-blank cell in Column J, then copy that entire row to another sheet(Sheet 2). Sheet2 will already have some rows filled from previous data, so it will need to paste the "non-blank cell row" on the first available row.
Most of the time, Column J will be blank. So I also need it not to give an error message if it can't find a non-blank cell.
Thanks in advance for the help!
Last edited by Misterturtle; 05-16-2013 at 10:25 PM.
I found this:
With Columns("B")
.Find(what:="*", after:=.Cells(1, 1), LookIn:=xlValues).Activate
End With
This finds the first non-blank cell, however it just selects it. How do I copy the row of the cell Find() well, finds.
Try like this...
Please Login or Register to view this content.
If your problem is solved, then please mark the thread as SOLVED>>Above your first post>>Thread Tools>>
Mark your thread as Solved
If the suggestion helps you, then Click *below to Add Reputation
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks