ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   copy and paste values in a range (https://www.excelbanter.com/excel-programming/379441-re-copy-paste-values-range.html)

Dave Peterson

copy and paste values in a range
 
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

Gary Keramidas

copy and paste values in a range
 
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

copy and paste values in a range
 
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

Gary Keramidas

copy and paste values in a range
 
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

copy and paste values in a range
 
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


All times are GMT +1. The time now is 03:33 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com