Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Message Box position
My MsgBox covers some data I want to see, is there a way to define a
position for it? Thanks |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Message Box position
Hi John;
Private Declare Function UnhookWindowsHookEx Lib "user32" _ (ByVal hHook As Long) As Long Private Declare Function GetCurrentThreadId Lib "kernel32" () As Long Private Declare Function SetWindowsHookEx Lib "user32" Alias _ "SetWindowsHookExA" (ByVal idHook As Long, ByVal lpfn As Long _ , ByVal hmod As Long, ByVal dwThreadId As Long) As Long Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long _ , ByVal hWndInsertAfter As Long, ByVal X As Long, ByVal Y As Long _ , ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long Private lgHook As Long Sub Positionned_MsgBox() lgHook = SetWindowsHookEx(&H5, AddressOf WinProc, 0, GetCurrentThreadId) MsgBox "Special msgbox (Left = 100 / Top = 100) !", 64 End Sub Private Function WinProc(ByVal lMsg As Long, ByVal wParam As Long) As Long If lMsg = 5 Then SetWindowPos wParam, 0, 100, 100, 0, 0, &H15 UnhookWindowsHookEx lgHook End If WinProc = False End Function Regards, MP "John Keturi" a écrit dans le message de news:1bhcd.44666$hj.43803@fed1read07... My MsgBox covers some data I want to see, is there a way to define a position for it? Thanks |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Data Validation Input Message Box Position Frozen | Excel Discussion (Misc queries) | |||
Change the position of a pop message | Excel Discussion (Misc queries) | |||
changing the message in an error message | Excel Worksheet Functions | |||
Displaying a message in a message box without requiring user to click anything to proceed | Excel Programming | |||
Position of Message Box on screen | Excel Programming |