Ajuster a la résolution de l ecran

[nesta656]

bonjour a tous les codeux
comment fait on pour ajuster mon user-form
en fonction de la résolution....
en effet j affiche un user-form en plein ecran
mais si je change la resolution de mon ecran il me manque la moitié de mon user form.
ya pas un code qui fait le calcul de la résolution??

 

[Jacques87]

Bonsoir

essaie ceci

With MonUserForm
.StartUpPosition = 3
.Width = Application.Width
.Height = Application.Height
.Left = 0
.Top = 0
End With

que tu places dans la procédure MonUserForm_Activate

bonne soirée

 

[Temjeh]

Bonjour à tous,Jacques et nesta

Pour ma part pour un centrage parfait des mes texbox et bouton sur toute résolution jutilise 2 userform un mondal et l'autre non...voir exemple

A+

Temjeh [file name=Fullscreen.zip size=10462]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Fullscreen.zip[/file]

 

[buromania]

Bsr nesta, le forum

Private Sub UserForm_Initialize()

W = Application.UsableWidth / 750
Me.Zoom = CInt(W * 100)
Me.Width = Me.Width * W
Me.Height = Me.Height * W

bon WE

 

[nesta656]

ok
ca marche merci a tous