VBA code for copying/ pasting data from one worksheet to another

[smithan04]

I am new to vba. What I am trying to do is copy data from my root workbook and paste the data in any workbook I have open. For example, from my root wk I would copy range (al138:bz138) and paste these formulas in the same location in current active workbook.

Any advice is appreciated. Thank you.

 

[Desu Nota from Columbus]

Root workbook name: Root
Sheet where data is located: Rootsheet

Change the above info in the macro to what your real workbook and sheet is named.

Sub pasteroottotarget()
Set wss = ActiveWorkbook.ActiveSheet
Workbooks.("Root.xls").Worksheets("Rootsheet").Range("AL138:BZ138").Copy
Wss.Range("AL138:BZ138").PasteSpecial xlPasteFormulas 

end Sub

See if this works for you. When you run this macro it will paste your root data to what ever workbook & sheet is currently activated (on top).

Assign this macro a hotkey to make it easily used ( Alt+F8, choose macro, click Options).

 

[Desu Nota from Columbus]

I should have asked, will the Root file will be open during the copy/paste?