VBA-copy paste values only-copy until last cell of range

jasleentatlay

New Member
Joined
Mar 8, 2019
Messages
2
I am trying to use following VBA code to copy and pastevalues only.I want to modify it where code can automatically find last cellused (this case I mentioned A1:D29 I would want system to find on its own.

Please advise.


Sub TransferValuesOnly()

Dim rng As Range
Set rng = Workbooks("Book1.xlsx").Worksheets(4).Range("A1:D29")


Workbooks("Mastertemplate.xlsx").Worksheets(3).Range("A7").Resize(rng.Rows.Count,rng.Columns.Count).Cells.Value = rng.Cells.Value

End Sub


 

Excel Facts

Move date out one month or year
Use =EDATE(A2,1) for one month later. Use EDATE(A2,12) for one year later.
So you need to create a variable "LR" to be determined by code of the last non-empty cell in Column D? - than assign that to the last cell in your range?
 
Upvote 0

Forum statistics

Threads
1,223,903
Messages
6,175,289
Members
452,631
Latest member
a_potato

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top