Redimensionner USF & Controle Plein taille de l'écran

[sarah33]

Bonjour le fofo !!!

J'utilise un USF avec des contoles (jusque là, rien d'incroyable).
A l'heure actuel mon USF ne prend pas tout mon ecran.. mais qu'une partie.
Cependant, les proportions entre le USF et ses Controls me convient très bien.
J'aimerai que ces proportions restent les mêmes, mais que le USF s'affiche automatiquement en plein écran... en fonction de l'écran utilisé: et donc que la taille des polices et controls s'agrandisse ou diminue avec le USF (kit à utiliser des scrollbar si l'écran est trop petit)

J'ai trouvé pas mal de truc sympa en archive, mais soit l'écran ne s'affiche pas automatiquement en plein écran, il faut le faire manuellement, soit les controls ne suivent pas...

Pourriez-vous m'aider?

Merciii à vous les ptits loups !

Sarah

 

[exene]

Re : Redimensionner USF & Controle Plein taille de l'écran

Bonjour,

Pourrais tu essayer ce code

Private Sub userForm_Activate()​

With Me​

.startUpPosition = 3​

.Width = Application.Width​

.Height = Application.Height​

.Left = 0​

.Top = 0​

End With​

End Sub
​

@+

 

[sarah33]

Re : Redimensionner USF & Controle Plein taille de l'écran

Bonjour exene,

Peux tu me dire ou placer ce code? car je suis très très novice en vba..

Merci beaucoup!

sarah

 

[exene]

Re : Redimensionner USF & Controle Plein taille de l'écran

Re,

Tu fais Alt f11,tu clique sur ton userform et tu colle le code que tu auras auparavant copié

@+

 

[sarah33]

Re : Redimensionner USF & Controle Plein taille de l'écran

Rebonjour,

J'ai donc bien testé le code, le USF se met donc en plein écran, cependant les controls ne suivent pas, ils gardent leurs taille normal. Or j'aimerai que les controls se redimensionnent avec le USF..

Une idée?

Sarah

 

[laetitia90]

Re : Redimensionner USF & Controle Plein taille de l'écran

bonjour sarah33 , exene

voir ton fichier joint modif dans initialise

 

[sarah33]

Re : Redimensionner USF & Controle Plein taille de l'écran

Bonjour laetitia90,

Merci pour ta réponse.
Ok pour le plein écran du USF. Cependant même problème les Controles ont gardé la même taille qu'à l'origine.. au lieu d'etre redimensionné avec le USF...

Avez vous une idée?

Merci !

Sarah

 

[Roland_M]

Re : Redimensionner USF & Controle Plein taille de l'écran

bonjour,

voir si ok !

 

[sarah33]

Re : Redimensionner USF & Controle Plein taille de l'écran

Bonjour Roland_M,

Ouahhhouuu ça marche super !!
Je te remercie pour ton aide !!

à très bientot !

sarah

 

[sarah33]

Re : Redimensionner USF & Controle Plein taille de l'écran

Re !

Après quelques tests, je me rend compte que tous les Controls sont bien redimensionnés, mais qu'en pratique ça ne colle pas trop.
En effet, les colonnes des ListBox restent de la même taille que précédemment définie...
Y a t il une solution?

Merci

 

[Roland_M]

Re : Redimensionner USF & Controle Plein taille de l'écran

re


EDIT:

j'annule le message il y a erreur !

effectivement !
il me semble que les colonnes ne sont pas modifiables ainsi !?
il faudrait revoir les dim indépendamment selon résolution !?
j'y regarde mais je te promet rien car je dois partir !

 

[Roland_M]

Re : Redimensionner USF & Controle Plein taille de l'écran

re

et voilà !

 

[sarah33]

Re : Redimensionner USF & Controle Plein taille de l'écran

Re Roland_M,

ah oui en effet, ça devient compliqué...
Je me disais (peut être naivement..) mais, vu que les Labels représentent en réalité les entete de colonne..
Ne serait il pas plus simple de dire que largeur des Labels = Largeur des colonnes? (vu que la largeur des Labels est déterminée avec ton code?)

Si oui, je vais mettre un fichier à jour avec des labels supplémentaires en guise d'entete de la listbox2 qui en est actuellement dépourvue.
(le nombre de colonne de Listbox 1 sera inférieur au nombre de colonne de Listbox2, dans la version finale de mon fichier)

merci pour ton aide

sarah

 

[sarah33]

Re : Redimensionner USF & Controle Plein taille de l'écran

Ah je viens de voir ta dernière edit !
ça à l'air de fonctionner impécablement bien !!

je fais des tests et remonte le fils si besoin


Merci beaucoup et à bientôt !!

sarah

 

[Roland_M]

Re : Redimensionner USF & Controle Plein taille de l'écran

re

si tu veux modifier ces valeurs qui sont plus précises:
s = 79 * zRX! '1
s = s & ";" & 83 * zRX! '2
s = s & ";" & 85 * zRX! '3
s = s & ";" & 83 * zRX! '4
s = s & ";" & 100 * zRX! '5
s = s & ";" & 43 * zRX! '6
s = s & ";" & 110 * zRX! '7
s = s & ";" & 80 * zRX! '8