a guest Jan 18th, 2019 54 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
- Sub Macro2()
- ' Macro2 Macro
- ChDir "X:XXXXXXXXXXXXXXXXXXXXWeek 3"
- ActiveWorkbook.ChangeLink Name:= _
- "X:XXXXXXXXXXXXXXXXXXXXWeek 2XXXXX Week 1.xlsx" _
- , NewName:= _
- "M:XXXXXXXXXXXXXXXXXXXXWeek 3XXXXX Week 2.xlsx" _
- , Type:=xlExcelLinks
- End Sub
RAW Paste Data