使用带有 Public 常量的 Environ("LOCALAPPDATA")。（或替代解决方案）

Question

我一直在使用下面的VBA代码

Public Const COSTER_FOLDER = "C:\Coster"

但是当他们移动文件夹位置时，这将不再有效。

新的 Coster 文件夹是 Environ("LOCALAPPDATA") & "\Coster"

是否有使用常量的简单方法或更好的方法？

问候彼得

Answer 1

这是另一个选项。删除旧定义，并使用它。

Public Function COSTER_FOLDER() As String
    COSTER_FOLDER = Environ("LOCALAPPDATA") & "\Coster"
End Function

那你就可以用同样的方法来使用了：

Debug.Print COSTER_FOLDER & "\test.txt"

Use Environ("LOCALAPPDATA") with a Public Const. (or an alternative solution)