A simple procedure, assuming you are in the same Worksheet as the imported
table and your cusor is where you want to put the filename...

Public Sub QueryConnection1()
ActiveCell.Value = ActiveSheet.QueryTables(1).Connection
End Sub

HTH,
--
Gary Brown

If this post was helpful, please click the ''Yes'' button next to ''Was this
Post Helpfull to you?''.


"coa01gsb" wrote:


Hi People,

Is there a way (function) to display the name of the file, from which
you have imported data into your sheet, in a cell of that sheet.

The data is imported using Data - Import External Data - .....

All help will be much appreciated


--
coa01gsb
------------------------------------------------------------------------
coa01gsb's Profile: http://www.excelforum.com/member.php...o&userid=31214
View this thread: http://www.excelforum.com/showthread...hreadid=524718