- Joined
- May 9, 2012
- Messages
- 10
- Reaction score
- 0
The red text needs to reference a cell for the file name...not sure how to achieve this. The reason is that the original file name changes for each subsequent day. So the "Collected Balance Beta Test file.xlsm" will eventually have a date as part of the name convention - so a cell within the worksheet will have this information. Below is the coding that works if the name does not change.
Sub Openfilewithdate()
'
' Openfilewithdate Macro
'
Workbooks.Open Cells(1, 1).Value
Range("D616").Select
Selection.Copy
Windows("Collected Balance Beta Test File.xlsm").Activate
Range("L7").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub
Thanks for looking at this..
Sub Openfilewithdate()
'
' Openfilewithdate Macro
'
Workbooks.Open Cells(1, 1).Value
Range("D616").Select
Selection.Copy
Windows("Collected Balance Beta Test File.xlsm").Activate
Range("L7").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub
Thanks for looking at this..