Hvordan finder jeg datostempel for en anden fil?

Via en macro, opdaterer jeg indholdet af en Excelfil, som hedder "TEST.xls" ud fra en XML-fil.

Når den er færdig med det, indsætter jeg NOW() i celle J1 i ark "Opslag".

Men det er jo ikke helt rigtigt; det er jo kun et udtryk for hvornår macroen er eksekveret.

Kan man ikke hente dato/klokkeslet for XML filen (strXMLFullName), og indsætte den i fx. celle J2?

Dette er min kode:
[code]    strFileName = ActiveWorkbook.Name
    strXMLName = "STREGKODER.XML"
    strXMLFullName = "\\servernavn\STREGKODER\" & strXMLName
   
'Ryd nuværende indhold i arket "Stregkodedump Gældende":
    Sheets("Stregkodedump Gældende").Select
    Cells.Select
    Selection.ClearContents
    Range("A1").Select
'Åbn den XML fil, der skal kopieres nyt indhold fra, og kopier alle celler:
    Workbooks.Open Filename:=strXMLFullName
    Cells.Select
    Selection.Copy
'Gå tilbage til den første Excel, og Paste ind:
'  Windows("TEST Stregkodedump.xls").Activate
    Windows(strFileName).Activate
    Application.StatusBar = "Opdaterer med nye Stregkoder - Indsætter ny fil..."
    ActiveSheet.Paste
'Luk XML filen igen:
'  Windows("STREGKODER.XML").Activate
    Windows(strXMLName).Activate
    Application.CutCopyMode = False
    ActiveWindow.Close
'Indsæt dato for opdatering i ark "Opslag" i celle J1:
    Sheets("Opslag").Select
    Range("J1").Select
    ActiveCell.FormulaR1C1 = "=NOW()"
    Range("J1").Select
    Selection.Copy
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
'Gem filen:
    ActiveWorkbook.Save
'Positioner i A2 i det aktive ark; "Opslag":
    Range("A2").Select[/code]