Copy/Paste/LastRow Help with Macro

[rsrasc]

Hi all,



The following code is an example of what I'm using to copy cell G17 ("ERPA") to cell A2 in "EPRALog", but what is doing is copying the formulas. I just want to copy the values. I tried several paste options but couldn't get it to work.

Sub CINFO()
 
Worksheets("ERPA").Range("G17").Copy Destination:=Worksheets("ERPALog").Range("A2")
 
End Sub

Other than the code shown above, what I'm looking for is when I select cell B8 ("FY 17-001--which has a drop down menu) in "ERPA", it will populate the following cells in row 2 in the "ERPALog".

ERPA EPRALog
From To
B8 A2
C5 B2
B15 C2
B16 D2
B17 E2
G17 F2
J17 G2
H18 H2
G19 I2
B20 J2

Therefore, every time I select a new request number from cell B8, for example, "FY 17-002", I want to copy and paste the below cells from "ERPA" to row 3 in "ERPALog".


ERPA EPRALog
From To

B8 A3
C5 B3
B15 C3
B16 D3
B17 E3
G17 F3
J17 G3
H18 H3
G19 I3
B20 J3

So, if my next request is FY-17-003, then I want the values to go to row 4.


I hope what I wrote is not confusing. If so, please accept my apologies, and let me know if more information is needed.

Thanks in advance for your cooperation.

Cheers!!!

[macropod]

Originally Posted by rsrasc

The following code is an example of what I'm using to copy cell G17 ("ERPA") to cell A2 in "EPRALog", but what is doing is copying the formulas. I just want to copy the values. I tried several paste options but couldn't get it to work.

How about:
Worksheets("ERPALog").Range("A2").Value = Worksheets("ERPA").Range("G17").Text