Excel 2007macros，VBAProject可以把一个configuration文件？

首先，我是一个更新的Excelmacros。 我读了一些文章，并做了一些工作，这些天。 但是现在我这么犹豫了。可以将.txt或.xml文件放到VBAProject中吗？如果是的话，如何获取文件的path或者如何获取文件的path？ 如果不是，有没有一个过境的方式来做这项工作？ 只要认为macros，而不是AddIn项目。 非常感谢！

Answer 1

您可以使用ini扩展名保存txt，并将其设置保存为键值对。 通过以下代码，您可以检索提供密钥和获取价值的设置。

Private Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long Public Function GetINIString(ByVal sApp As String, ByVal sKey As String, ByVal filepath As String) As String Dim sBuf As String * 256 Dim lBuf As Long lBuf = GetPrivateProfileString(sApp, sKey, "", sBuf, Len(sBuf), filepath) GetINIString = Left$(sBuf, lBuf) End Function Sub sample() Dim Path As String Path = ThisWorkbook.Path & "\" & "Path.ini" Link = GetINIString("Path", "Link", Path) End Sub 

请将.ini文件保存在工作簿所在的同一文件夹中，或者可以相应地更改Pathvariables。

您也可以参考此链接了解更多详情。