在Mac GIves上运行Excel Addin错误

Question

我有一个Excel Addin在Excel 2010和2013上完美运行但是当我尝试将此插件添加到Excel Mac版本时，它会出现错误，错误是由于下面给出的代码。如何更改此代码以使其在MAC上运行。

Declare PtrSafe Function GetPrivateProfileString Lib "kernel32" Alias _
    "GetPrivateProfileStringA" (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

Private Declare PtrSafe Function GetPrivateProfileSection Lib "kernel32" Alias _
    "GetPrivateProfileSectionA" (ByVal lpAppName As String, ByVal lpReturnedString As String, _
    ByVal nSize As Long, ByVal lpFileName As String) As Long

Declare PtrSafe Function WritePrivateProfileString Lib "kernel32" _
    Alias "WritePrivateProfileStringA" _
    (ByVal sSectionName As String, _
    ByVal sKeyName As String, _
    ByVal sString As String, _
    ByVal sFileName As String) As Long