Question

所以我有一个.csv文件，每天导出到我的文件中，格式为：＆＃34; FILENAME03_28_2017-14_45_01＆＃34;所以每天都会改变日期。我试图能够将该文件中的所有内容复制并粘贴到不同的Excel工作表中，但由于文件名每天都在变化，我无法弄清楚如何编写代码以查看某个单元格的日期并将其与基本的FILENAME连接以打开它。我有一个代码打开该文件夹中的最新文件，但它的复制粘贴部分我被困在。

你不能做类似的事情（C15包含当前日期）？

Windows("C:\Users\ME\Desktop\FOLDERS\FILENAME" & Range("C15")&".csv").Activate
Range("A1").Select
Range(Selection, Selection.End(xlDown)).Select
Range(Selection, Selection.End(xlToRight)).Select
Selection.Copy
Windows("EXCELFILE.xlsm").Activate
Sheets("SHEET1").Select
Range("T1").Select
ActiveSheet.Paste`

谢谢你！

Answer 1

您可以使用此vba代码捕获日期：

format(date, "mm_dd_yyyy") 'returns "03_28_2017"

日期是Excel VBA中的关键字，以mm / dd / yyyy格式显示今天的日期。但是，您可以使用上面写的 Format 函数将其转换为多种格式。结果输出是一个字符串，而不是日期 - 因此您可以在动态文件名中使用它。

VBA代码将每日更改.csv文件复制并粘贴到excel中

1 个答案: