Hello All, any help would be greatly appreciated. Im trying to copy the cell
data from one workbook to another and Im not sure what Im doing. Could
someone please help? I want the user to type "30" and it to find the data on
30.xls .. etc.
Here is what I have.. obviously it dosn't work
Sub Copy()
'
Dim sStuff As String
sStuff = InputBox("What date is this for? I.E 1,2,3 etc.")
'
Range("B20").Select
ActiveCell.FormulaR1C1 = "='\\Server1\Important Files\[" & sStuff &
".xls]Totals'!$H$3"
End Sub
Thanks in advance!
Bookmarks