在单元格中显示一个单独的excel文档的修改日期

我有一个excel通过一个简单的范围复制公式从另一个excel中提取数据，但是我想知道是否有可能也拉动日期&时间源excel最后修改后放入目标excel中的单元格中。在单元格中显示一个单独的excel文档的修改日期

通过研究，我发现了FILEDATETIME函数，但是我不确定这是否适用于我正在尝试做的事情。

任何帮助将超级赞赏！非常感谢！！

2016-12-14 Nexter1

是的，这正是你需要得到你从上拉的文件的最后修改日期。但没有任何代码不知道这将如何适合你已经做的事情。 'FileDateTime（ “C：\ Example.xls”）'。 –

Dim fso As FileSystemObject, f As File '<-- reference: Microsoft Scripting Runtime 
Set fso = New FileSystemObject 
Set f = fso.GetFile(mySourceWorkbook.FullName) 

Debug.Print f.DateCreated f.DateLastAccessed f.DateLastModified 
' And you can get much more information about the file

来源

2016-12-14 17:38:29

Hi A.S.H.感谢您的答复！对不起，我对VBA /宏有一点新意，在代码中我会把希望打印的信息放到特定的单元格中？（对不起，如果这是一个愚蠢的问题）另外，当我尝试运行它，它说，编译错误：用户定义类型没有定义，它突出显示：“fso作为FileSystemObject” – Nexter1

你应该添加一个对VBA项目的引用： '工具 - >参考 - >检查Microsoft脚本运行时“。然后将文件名写入单元格中，例如在单元格A1中：'Range（“A1”）。Value = f.DateLastModified' –

非常感谢A.S.H.它的工作完美！ – Nexter1

在单元格中显示一个单独的excel文档的修改日期

回答

相关问题