如何以数字方式知道上次保存的文件名

时间:2017-07-28 19:03:52

标签: excel-vba vba excel

我正在Excel中创建并保存.ini文件。这些文件需要遵循特定的命名约定,每次创建文件时该约定都会增加1。并非所有文件都将在Excel中创建,有些文件将在单独的程序中完成。有没有办法读取其文件夹中保存的文件,以了解下一个是哪个号码?

例如,有一些名为exampleFile1.ini的文件通过exampleFile63.ini。从Excel使用VBA或其他方法我可以看到exampleFile63.ini是最后一个文件,并命名为下一个exampleFile64.ini?

谢谢。如果那不明显,我会很新。

1 个答案:

答案 0 :(得分:0)

此函数将返回下一个可用的.INI文件名:

Private Function GetNextFile() As String
    Dim i As Long
    Dim fileName As String

    For i = 1 To 1000
        ' Update Path and File Name prefix below to where your .INI files will be stored.
        fileName = "d:\path\exampleFile" & i & ".ini"

        If Dir(fileName) = "" Then
            GetNextFile = fileName
            Exit Function
        End If
    Next
End Function

这样称呼:

Dim NextIniFile As String
NextIniFile = GetNextFile()