PC Review


Reply
Thread Tools Rate Thread

do if cell not empty

 
 
Helmut
Guest
Posts: n/a
 
      13th May 2009
I am working on an order form. I have a list of items from a catalogue. So
far so good. Now when a person ADDs NEW ITEMS at the bottom of the list, I
need to copy some cells for as many rows as NEW ITEMS were added.

i.e. let's say there are 10rows with catalogue items, and there are two new
items added in column "C", then I have to copy "A and B 10" to "A and B 11
and 12" as well as "G and H 10" to "G and H 11 and 12".

HELP for the code.
thanks
 
Reply With Quote
 
 
 
 
Bob Phillips
Guest
Posts: n/a
 
      13th May 2009

LastRow = Range("A1").End(xlDown).Row
Cells(LastRow, "A").Resize(NumRows, 2).Copy Cells(LastRow + 1, "A")
Cells(LastRow, "G").Resize(NumRows, 2).Copy Cells(LastRow + 1, "G")

--
__________________________________
HTH

Bob

"Helmut" <(E-Mail Removed)> wrote in message
newsE19452A-B93A-4230-B24F-(E-Mail Removed)...
>I am working on an order form. I have a list of items from a catalogue. So
> far so good. Now when a person ADDs NEW ITEMS at the bottom of the list, I
> need to copy some cells for as many rows as NEW ITEMS were added.
>
> i.e. let's say there are 10rows with catalogue items, and there are two
> new
> items added in column "C", then I have to copy "A and B 10" to "A and B 11
> and 12" as well as "G and H 10" to "G and H 11 and 12".
>
> HELP for the code.
> thanks



 
Reply With Quote
Reply

Thread Tools
Rate This Thread
Rate This Thread:

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

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


Similar Threads
Thread Thread Starter Forum Replies Last Post
find empty cells in a column then append row that empty cell is in vbnewbie Microsoft Excel Programming 9 29th Jan 2009 09:27 AM
why a reference to an empty cell is not considered empty =?Utf-8?B?Tmljb3Njb3Q=?= Microsoft Excel Misc 10 10th Mar 2006 05:36 AM
Finding next empty empty cell in a range of columns =?Utf-8?B?VW5jbGVCdW4=?= Microsoft Excel Programming 1 13th Jan 2006 11:22 PM
Empty (NUll) value in cell, not empty string? Jan Kronsell Microsoft Excel Discussion 4 20th Nov 2004 05:09 PM
filling empty cell if not empty keep its content!? Tarek Microsoft Excel Worksheet Functions 4 23rd Feb 2004 08:48 AM


Features
 

Advertising
 

Newsgroups
 


All times are GMT +1. The time now is 11:07 PM.