Hi

Is it possible to amend the code below so that the filepath is determined by the contents of a cell, say Sheet1!B$2$? The code is the start of a macro that pulls in the delimited data from the file Applesnew, formats it, and converts # symbols to £ ready for calculating totals.

The problem is that on any given day I get 16 of the source files from different providers, say Applesnew, Bananasnew, Cherriesnew. If I have to use a static filepath in my code I'll need 16 different spreadsheets (the sheets, which also contain very sensitive information, get mailed off to the data provider, so I don't want a single-workbook-with-16-worksheets solution. My auditor probably wouldn't appreciate it either :)

'import data
With ActiveSheet.QueryTables.Add(Connection:= _
"TEXT;\\server\apollo\LATEST PAYMENTS - TEST\Applesnew.", _
Destination:=Range("$A$5"))
.Name = "Apples080213."
.FieldNames = True
.RowNumbers = False
…[]

The macro was recorded as I'm not much at writing code, but I assume the part that needs amending is that "Applesnew." should somehow link to the contents of cell B2. And that's where I get stuck. Does anyone have any suggestions at all, please?

Thanks in advance,

Steve