Hi, from your post, I guess that you know how to insert new blank rows. The
following code snippet will help duplicate the contents of Source cell into
the Destination cell.

Dim t1, t2 as Range
set t1 = Cells( Source_Row, Source_Col )
set t2 = Cells( Destination_Row, Destination_Col )
t2.value = t1.value

I hope it helps you.

" wrote:

ok, i have a spread sheet with a list of property and a list of each
properties key numbers.

Each property has 2 or 3 or 4 copys of each key and each key is signed
out to different people at different times. i need excel to make a
worksheet i can easily access and mark who has which key when.

So far i have all the address in one colum, the key ref in another and
the number of key copies we have for each property.

BUT i am trying to get my head around an issue... if i input say 3
keys i would like to automatically generate 3 rows underneath that
property and copy the address/key ref cells so i can then input who
has what where and when.

I have found a macro that will take the number of key copies and then
make blank rows below the row but not to copy details into them

I then use a autofilter to the top of the sheet which allows me to
search for address, key ref and by location.

I dont want to get tooo complicated and i need it in excel as everyone
in the office must be able to come to my pc and access this sheet
quickly and easily.

Am i barking up the right tree & can anyone suggest a maco to copy the
details -