resize d'un userform

[jf27]

bjr,

j'ai userform qui est dimensionner pour ma taille d'écran pc fixe.


Quand j'execute cette macro sur un portable 16/9, l'userform est trop haut et n'apparait pas complétement.
Existe t'il un moyen que l'userform se dimensionne automatiquement??...

Merci

+
jf27

 

[Roland_M]

Re : resize d'un userform

bonsoir

automatiquement NON !
il faut une routine pour capter la résolution écran en cours
et une routine pour adapter l'userform et ses contrôles !

Edit:
un exemple à étudier avec zoom userform pour agrandir non seulement
l'userform mais aussi ses contrôles !

 

[skoobi]

Re : resize d'un userform

Bonsoir,

tu peux dimensionner l'USF à la dimension d'Excel si ça te conviens:

Sub tailleusf()
UserForm1.Width = Application.Width
UserForm1.Height = Application.Height
UserForm1.Show
End Sub

 

[jf27]

Re : resize d'un userform

super ca marche,

j'avais trouvé pour le userform mais pas pour les controles

merci