I'm trying to write a code that copy/paste from one worksheet to another. I'm trying to choose specific columns in the Worksheet titled "FY 13 S3 FR PUF" and copy those into "ProvCBSA AHW Analysis."
Here's the code I have written but cannot get it to work:
Sub CopyData()
Sheets("FY 13 S3 FR PUF").Select
Range("A9").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Copy
Sheets("ProvCBSA AHW Analysis").Select
Range("A10").Select
Selection.PasteSpecial Paste:=xlPasteValues
End Sub
Also, I would like to add additional columns - once I get this to work, can I simply recreate the coe above and just change the cells locations to the new columns I would like to copy/paste?
Thanks!
Here's the code I have written but cannot get it to work:
Sub CopyData()
Sheets("FY 13 S3 FR PUF").Select
Range("A9").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Copy
Sheets("ProvCBSA AHW Analysis").Select
Range("A10").Select
Selection.PasteSpecial Paste:=xlPasteValues
End Sub
Also, I would like to add additional columns - once I get this to work, can I simply recreate the coe above and just change the cells locations to the new columns I would like to copy/paste?
Thanks!