USF pleine ecran

[Franck]

Bonjour le forum bonjour a tous

J'aimerai que mon USF s'affiche toujour en plein ecran
tout en sachant que l'ecran ne sera pas toujours de la meme taille
ici sur un 15 pouces la sur un 19 pouces ...

Merci de votre aide

Franck

 

[PascalXLD]

Bonjour

Voici un bout de code

Private Sub UserForm_Initialize()

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

end sub

 

[PascalXLD]

Oups c'est parti plus vite que je ne voulais

Ce code te mets ton UF en plein ecran mais ne zoome pas donc tu restes avec tous tes controles aux mêmes dimensions

Alors là il faudrait jouer avec les zoom et c'est pas de la tarte. Tu as une demo de @+Thierry sur l'ancien forum sur le sujet

Bonne journée

 

[Franck]

Salut Pascal

Et c'est bien sur je savais et j'y ai pas pensé - Tete en l'air

Encore merci
A+ Franck