with worksheets("sheet9999")
.range("b4:ad49").copy _
destination:=.range("b53")
end with

If you really only need values:

dim RngToCopy as range
with worksheets("sheet9999")
set rngtocopy = .range("b4:ad49")
.range("b53").resize(rngtocopy.rows.count,rngtocop y.columns.count).value _
= rngtocopy.value
end with

Or
with worksheets("sheet9999")
.range("b4:ad49").copy
.range("b53").pastespecial paste:=xlpastespecialvalues
end with



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.

--

Dave Peterson

just curious, what would be wrong with just using 1 line like this?

Range("B4:AD49").Copy Range("B53")

--


Gary


"Dave Peterson" wrote in message
...
with worksheets("sheet9999")
.range("b4:ad49").copy _
destination:=.range("b53")
end with

If you really only need values:

dim RngToCopy as range
with worksheets("sheet9999")
set rngtocopy = .range("b4:ad49")
.range("b53").resize(rngtocopy.rows.count,rngtocop y.columns.count).value _
= rngtocopy.value
end with

Or
with worksheets("sheet9999")
.range("b4:ad49").copy
.range("b53").pastespecial paste:=xlpastespecialvalues
end with



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.

--

Dave Peterson

Absolutely nothing.

I just like to fully qualify my ranges (with worksheets(...)) and I like to use
named parameters. And I like two lines--just for ease of reading.



Gary Keramidas wrote:

just curious, what would be wrong with just using 1 line like this?

Range("B4:AD49").Copy Range("B53")

--

Gary

"Dave Peterson" wrote in message
...
with worksheets("sheet9999")
.range("b4:ad49").copy _
destination:=.range("b53")
end with

If you really only need values:

dim RngToCopy as range
with worksheets("sheet9999")
set rngtocopy = .range("b4:ad49")
.range("b53").resize(rngtocopy.rows.count,rngtocop y.columns.count).value _
= rngtocopy.value
end with

Or
with worksheets("sheet9999")
.range("b4:ad49").copy
.range("b53").pastespecial paste:=xlpastespecialvalues
end with



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.

--

Dave Peterson

--

Dave Peterson

ok, i understand the qualifying of the ranges and do use it. i was just curious
about using, or not using, the named parameters.

--


Gary


"Dave Peterson" wrote in message
...
Absolutely nothing.

I just like to fully qualify my ranges (with worksheets(...)) and I like to
use
named parameters. And I like two lines--just for ease of reading.



Gary Keramidas wrote:

just curious, what would be wrong with just using 1 line like this?

Range("B4:AD49").Copy Range("B53")

--

Gary

"Dave Peterson" wrote in message
...
with worksheets("sheet9999")
.range("b4:ad49").copy _
destination:=.range("b53")
end with

If you really only need values:

dim RngToCopy as range
with worksheets("sheet9999")
set rngtocopy = .range("b4:ad49")
.range("b53").resize(rngtocopy.rows.count,rngtocop y.columns.count).value
_
= rngtocopy.value
end with

Or
with worksheets("sheet9999")
.range("b4:ad49").copy
.range("b53").pastespecial paste:=xlpastespecialvalues
end with



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.

--

Dave Peterson

--

Dave Peterson

I like named parms -- especially when the alternative is something like:

xxxx.yyyyy , , , , , , true, , , 0 , false, 1, 3



Gary Keramidas wrote:

ok, i understand the qualifying of the ranges and do use it. i was just curious
about using, or not using, the named parameters.

--

Gary

"Dave Peterson" wrote in message
...
Absolutely nothing.

I just like to fully qualify my ranges (with worksheets(...)) and I like to
use
named parameters. And I like two lines--just for ease of reading.



Gary Keramidas wrote:

just curious, what would be wrong with just using 1 line like this?

Range("B4:AD49").Copy Range("B53")

--

Gary

"Dave Peterson" wrote in message
...
with worksheets("sheet9999")
.range("b4:ad49").copy _
destination:=.range("b53")
end with

If you really only need values:

dim RngToCopy as range
with worksheets("sheet9999")
set rngtocopy = .range("b4:ad49")
.range("b53").resize(rngtocopy.rows.count,rngtocop y.columns.count).value
_
= rngtocopy.value
end with

Or
with worksheets("sheet9999")
.range("b4:ad49").copy
.range("b53").pastespecial paste:=xlpastespecialvalues
end with



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.

--

Dave Peterson

--

Dave Peterson

--

Dave Peterson