在Excel中写宏，可以读ini文件么？

[机器人]

Declare Function GetPrivateProfileString Lib "kernel32" ( _
ByVal lpApplicationName As String, _
ByVal lpKeyName As Any, _
ByVal lpDefault As String, _
ByVal lpReturnedString As String, _
ByVal nSize As Long, _
ByVal lpFileName As String _
) As Long
End Function

可以么？？？我这么声明不好使啊，如果可以请帮帮忙给出代码，多谢。

[xiaohuasz]

可以的
api声明不用End Function
用下面的函数简单一点
Declare Function GetPrivateProfileInt Lib "kernel32" Alias "GetPrivateProfileIntA" (ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal nDefault As Long, ByVal lpFileName As String) As Long

[机器人]

哦，原来这样啊。谢谢：）