Ecran de droite ou de gauche ?!

F

F22Raptor

XLDnaute Impliqué

• 15 Octobre 2014

• #2

Re : Ecran de droite ou de gauche ?!

Des idées sur cette question ?

 

Vote positif 0 Vote négatif

blord

XLDnaute Impliqué

• 15 Octobre 2014

• #3

Re : Ecran de droite ou de gauche ?!

Bonjour,

Si le but est de faire afficher un Userform sur l'écran ou l'instance d'Excel est ouverte, j'utilise ce code à l'initialisation du Userfrom :


Private Sub UserForm_Initialize()
Me.StartUpPosition = 0
Me.Top = Application.Top + ((Application.Height) / 2) - (Me.Height / 2)
Me.Left = Application.Left + ((Application.Width) / 2) - (Me.Width / 2)

Ce code centre le userfrom sur l'écran où se trouve Excel....

blord

 

Vote positif 0 Vote négatif

Roland_M

XLDnaute Barbatruc

• 15 Octobre 2014

• #4

Re : Ecran de droite ou de gauche ?!

bonsoir,

on peut tout simplement mettre la propriété de l'userf
Me.StartUpPosition = 2
pour centrer l'userf sur n'importe quel écran

 

Vote positif 0 Vote négatif

F

F22Raptor

XLDnaute Impliqué

• 15 Octobre 2014

• #5

Re : Ecran de droite ou de gauche ?!

Simple, mais génial 🙂

Merci Blord !

 

Vote positif 0 Vote négatif

Roland_M

XLDnaute Barbatruc

• 15 Octobre 2014

• #6

Re : Ecran de droite ou de gauche ?!

re

je réitère
le plus simple c'est de mettre la propriété de l'userf Me.StartUpPosition = 2 ou = 1
pour centrer l'userf sur n'importe quel écran

 

Vote positif 0 Vote négatif

F

F22Raptor

XLDnaute Impliqué

• 15 Octobre 2014

• #7

Re : Ecran de droite ou de gauche ?!

Hello Laurent, et merci de ta soluce.
En fait, chez moi, le StartUpPosition donne des résultats bizarres !
Par exemple, avec "1", si j'ai Excel sur l'écran de droite, la boîte est collée contre le bord droit de l'écran gauche 😀

Du coup, la soluce Blord convient mieux dans mon cas

 

Vote positif 0 Vote négatif