Question

我有一个文件，我导入访问2007年，我想知道我是否可以参与该文件名并将其放入访问的字段中？例如，这是文件名的一个示例：

＆＃34; 20140211_agent_statistics.csv＆＃34;

我已经对此做了一些研究，但似乎无法在数字一直变化时找到答案。我只需要抓住这个文件名的数字。但是，这些数字一直在变化。有人有解决方案吗？先感谢您。任何帮助和代码都非常感谢我对vba很新。

Answer 1

做一些假设：

您是通过代码导入它，以便它获取文件名？数字是日期，所以可能总是8个字符？

如果您按代码导入，则会将文件名分配给变量，以防您不在此处如何：

Dim strFileO as String, strFileLoc as String
strFileLoc = "C:\YourFolder\" ' Folder where file is saved
strFileO = Dir(strFileLoc & "*.csv")

上面会选择文件夹中的任何.csv文件，你应该在导入后移动它们

获得strFileo然后获取日期：

Dim lDate as Long
lDate = Left(strFileO,8)
'Or if the numbers aren't always 8 characters:
lDate = Left(strFileO. InStr(strFileO,"_") - 1) ' Assumes numbers followed by "_"

如何将部分文件名导入字段

1 个答案: