Lets presume the range you want copy is always in B4:AD49. Try
something like this although don't shout if it doesn't work, i'm new to
code myself!


Sub copythesecells()

Sheets("sheet1").Select 'change the name of sheet1 to the name of
your sheet
Sheets("sheet1").Range("b4:ad49").Select
Selection.Copy
Sheets("sheet1").range("b53").Select
ActiveSheet.Paste

End Sub


Dave F wrote:
This should be a simple VBA routine:

I have a range, B4:AD49

I want to copy the range and paste its values in another range. The upper
left hand corner of this new range would be B53 of the same worksheet. How
would I do this via VBA?

(Why am I doing this? Because this sheet is part of a larger model, and the
sheet is being used by a novice to Excel who needs only the values in the
aforementioned range. I figure copying this range and pasting its values
elsewhere on the sheet is the easiest way to idiot-proof the data. Once I
figure out how to copy and paste the values in range B4:AD49, I'll then have
the macro hide rows that don't need to be viewed by the novice user.)
--
Brevity is the soul of wit.