Change VBA code to fit 64-bit environment
Following declarations from my earlier 32-bit environment must be corrected, but I dont know how. Please help...
Code:
Declare Function FindWindowByClass Lib "user32" Alias _
"FindWindowA" (ByVal lpClassName As String, ByVal _
lpWindowName As Long) As Long
Declare Function RegisterWindowMessage Lib "user32" Alias _
"RegisterWindowMessageA" (ByVal lpstring As String) As Long
Declare Function FindWindow Lib "user32" Alias _
"FindWindowA" (ByVal lpClassName As Any, ByVal _
lpWindowName As Any) As Long
Declare Function SendMessage Lib "user32" Alias _
"SendMessageA" (ByVal hwnd As Long, ByVal _
wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Change VBA code to fit 64-bit environment
Quote:
Originally Posted by
Bo Hansson
Following declarations from my earlier 32-bit environment must be corrected, but I dont know how. Please help...
Code:
Declare Function FindWindowByClass Lib "user32" Alias _
"FindWindowA" (ByVal lpClassName As String, ByVal _
lpWindowName As Long) As Long
Declare Function RegisterWindowMessage Lib "user32" Alias _
"RegisterWindowMessageA" (ByVal lpstring As String) As Long
Declare Function FindWindow Lib "user32" Alias _
"FindWindowA" (ByVal lpClassName As Any, ByVal _
lpWindowName As Any) As Long
Declare Function SendMessage Lib "user32" Alias _
"SendMessageA" (ByVal hwnd As Long, ByVal _
wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
This is a Visual Basic for Applications (VBA) code that declares several functions from the "user32" library. These functions can be used to find windows and send messages to them. The code is incomplete and missing some parameters for the functions, so it may not compile or work correctly without further modifications.