[[20171112083426]]　『32bit　64bitについて』（ゆめ）　ページの最後に飛ぶ

『32bit　64bitについて』（ゆめ）

お世話になりますご教授お願いいたします
32bit　2007から64bit　2013に乗り換えたところ
下記のマクロの部分が　64bit用に更新が必要　
declareステートメント　更新及び　ptrsafe属性を設定
という　エラーメッセージが出ます
どのようにすればいいのでしょうか

よろしくお願いいたします

Public Declare Function SHBrowseForFolder Lib "shell32.dll" _

    Alias "SHBrowseForFolderA" (lpBROWSEINFO As BROWSEINFO) As Long

Public Declare Function SHGetPathFromIDList Lib "shell32.dll" _

    Alias "SHGetPathFromIDListA" (ByVal pidl As Long, ByVal pszPath As String) As Long

Public Declare Function FindWindow Lib "USER32.dll" _

    Alias "FindWindowA" (ByVal lpClassName As Any, ByVal lpWindowName As Any) As Long

Public Declare Function SHFree Lib "shell32.dll" Alias "#195" (ByVal pidl As Long) As Long

Public Declare Function WritePrivateProfileString Lib "kernel32" _

    Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, _
    ByVal lpKeyName As String, ByVal lpString As String, ByVal lpFileName As String) As Long

Public Declare Function GetDesktopWindow Lib "user32" () As Long
Public Declare Function TerminateProcess Lib "kernel32" _

        (ByVal hProcess As Long, ByVal uExitCode As Long) As Long

Public Declare Function ShellExecuteEX Lib "shell32.dll" Alias "ShellExecuteEx" _

    (SEI As SHELLEXECUTEINFO) As Long

＜使用 Excel：Excel2013、使用 OS：Windows10 ＞

Declare　ptrsafe　 Function　書き換えで解決しました
（ゆめ） 2017/11/12(日) 11:22

コメント返信：

[ 一覧(最新更新順) ]

[[20171112083426]] 『32bit 64bitについて』（ゆめ） ページの最後に飛ぶ

[[20171112083426]]　『32bit　64bitについて』（ゆめ）　ページの最後に飛ぶ