Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Display userforms
Hi, I have created a userform that fills my screen, but when i display
the userform on another computer it displays part of the form due to the different screen size. How can i get the userform to change it size to display on any computer Thanks Oggy |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Display userforms
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Display userforms
Hi Oggy,
check the screen resolution beforehand, like this: Declare Function GetSystemMetrics Lib "user32" _ (ByVal nIndex As Long) As Long Public Sub Jajaja() MsgBox GetSystemMetrics(0) ' horizontal MsgBox GetSystemMetrics(1) ' vertical End Sub There is more to it: ' GetSystemMetrics() codes Public Const SM_CXSCREEN = 0 Public Const SM_CYSCREEN = 1 Public Const SM_CXVSCROLL = 2 Public Const SM_CYHSCROLL = 3 Public Const SM_CYCAPTION = 4 Public Const SM_CXBORDER = 5 Public Const SM_CYBORDER = 6 Public Const SM_CXDLGFRAME = 7 Public Const SM_CYDLGFRAME = 8 Public Const SM_CYVTHUMB = 9 Public Const SM_CXHTHUMB = 10 Public Const SM_CXICON = 11 Public Const SM_CYICON = 12 Public Const SM_CXCURSOR = 13 Public Const SM_CYCURSOR = 14 Public Const SM_CYMENU = 15 Public Const SM_CXFULLSCREEN = 16 Public Const SM_CYFULLSCREEN = 17 Public Const SM_CYKANJIWINDOW = 18 Public Const SM_MOUSEPRESENT = 19 Public Const SM_CYVSCROLL = 20 Public Const SM_CXHSCROLL = 21 Public Const SM_DEBUG = 22 Public Const SM_SWAPBUTTON = 23 Public Const SM_RESERVED1 = 24 Public Const SM_RESERVED2 = 25 Public Const SM_RESERVED3 = 26 Public Const SM_RESERVED4 = 27 Public Const SM_CXMIN = 28 Public Const SM_CYMIN = 29 Public Const SM_CXSIZE = 30 Public Const SM_CYSIZE = 31 Public Const SM_CXFRAME = 32 Public Const SM_CYFRAME = 33 Public Const SM_CXMINTRACK = 34 Public Const SM_CYMINTRACK = 35 Public Const SM_CXDOUBLECLK = 36 Public Const SM_CYDOUBLECLK = 37 Public Const SM_CXICONSPACING = 38 Public Const SM_CYICONSPACING = 39 Public Const SM_MENUDROPALIGNMENT = 40 Public Const SM_PENWINDOWS = 41 Public Const SM_DBCSENABLED = 42 Public Const SM_CMOUSEBUTTONS = 43 Public Const SM_CMETRICS = 44 Public Const SM_CXSIZEFRAME = SM_CXFRAME Public Const SM_CYSIZEFRAME = SM_CYFRAME Public Const SM_CXFIXEDFRAME = SM_CXDLGFRAME Public Const SM_CYFIXEDFRAME = SM_CYDLGFRAME HTH -- Greetings from Bavaria, Germany Helmut Weber, MVP WordVBA Win XP, Office 2003 "red.sys" & Chr$(64) & "t-online.de" |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
userforms | Excel Programming | |||
UserForms:listbox display problems | Excel Programming | |||
Userforms | Excel Programming | |||
userforms | Excel Programming | |||
Userforms - Display result of a calculation in a textbox | Excel Programming |