XL 2016 affichage userform avec 2 ou + ecrans

[roby]

Bonjour le forum,

Lorsqu'on lance un fichier Excel sur un poste avec plusieurs écrans, à chaque fois les userform s'affichent sur un autre écran que l'écran ou est affiché excel.
y a-t-il une parade pour que cet userform s'affiche dans la même fenêtre que excel ?

je joint le même fichier solutionné dernièrement pour le test.

Merci encore.

 

[Compte Supprimé 979]

Bonjour Roby,

Voici ce que j'utilises dans l'Userform

Private Sub UserForm_Initialize()
  ' Centrer l'USF
  With Me
    .StartUpPosition = 0   ' Edit oublié car au tout début de ma procédure
    .Left = (Application.Left + Application.Width) - ((Application.Width + .Width) / 2)
    .Top = (Application.Top + Application.Height) - ((Application.Height + .Height) / 2)
  End With
End Sub

A+

 

[Lolote83]

Bonjour à tous
Perso je rajoute la commande StartUpPosition=0, mais est-elle utile ? Après plusieurs essais sur les 4 choix proposés, je pense que OUI, sinon rien ne change par rapport à ce qu'à écrit @BrunoM45 .

Les 4 choix proposés sont :
- StartUpPosition = 0 (Manual)
- StartUpPosition = 1 (CenterOwner)
- StartUpPosition = 2 (CenterScreen)
- StartUpPosition = 3 (Windows Default)

Private Sub UserForm_Initialize()
    '-------------------------------------------------------- Positionnement UserForm
    Me.StartUpPosition = 0                                                  'Déclarer position MANUAL
    Me.Left = Application.Left + Application.Width / 2 - Me.Width / 2
    Me.Top = Application.Top + Application.Height / 2 - Me.Height / 2
End Sub

@+ Lolote83

 

[Dudu2]

Bonjour à tous,
@Lolote83, c'est sûr, le StartUpPosition = 0 est indispensable si on veut contrôler le positionnement.

 

[Lolote83]

Bonjour @Dudu2 ,

@Lolote83, c'est sûr, le StartUpPosition = 0 est indispensable si on veut contrôler le positionnement.

Je m'en doutais un peu c'est pourquoi je me suis permis de compléter le code fourni par @BrunoM45 que j'utilise moi aussi. Je pensais vraiement que cela avait son importance.
Bonne journée à toi
@+ Lolote83

 

[Dudu2]

Si la solution de @BrunoM45 ne donnait pas satisfaction au demandeur, j'ai un classeur avec pas mal de fonctions qui permettent de positionner un UserForm dans le même ou l'autre écran que celui d'Excel, récupérer les RECT des écrans, des zones de travail (hors barres des tâches), des barres des tâches, etc...
J'ai dû m'y coltiner pour un utilisateur et comme c'est plus complexe je ne le proposerai que si nécessaire.

 

[TooFatBoy]

Bonjour,

j'ai un classeur avec pas mal de fonctions qui permettent de positionner un UserForm dans le même ou l'autre écran que celui d'Excel, récupérer les RECT des écrans, des zones de travail (hors barres des tâches), des barres des tâches, etc.

Et ça marche super bien !

 

[Lolote83]

Re bonjour à tous,
J'avais par ailleurs répondu à ta demande @Dudu2 dans ce post
https://excel-downloads.com/threads...m-pc-a-2-ecrans.20062299/page-3#post-20524811
Je serais intéréssé par ce "fameux" classeur mais c'est peut être un de ceux joints dans la discution mentionnée ci-dessus ?
@+ Lolote83

 

[Dudu2]

Et ça marche super bien !

Et bé tant mieux !

@Lolote83, justement je suis en train de le revoir pour rendre les fonctions de positionnement plus simples.
D'ailleurs j'en ferai sûrement une ressource. Ça peut intéresser des personnes. Je te le place ici dès que j'ai terminé mes amélriorations et commentaires.

 

[Lolote83]

Re bonjour,
Merci @Dudu2 pour ce futur partage.
Bien que je ne comprenne pas toujours tes demandes qui sont trop complexes pour moi, je parcours assez régulièrement tes demandes car elles sont souvent sources d'inspirations.
@+ Lolote83

 

[Dudu2]

La question que je me pose c'est comment indiquer le positionnement du UserForm relatif à l'écran demandé (celui d'Excel ou l'autre) sachant que par Left et Top c'est pas évident puisque les Left et Top de référence ne sont pas forcément à 0 si c'est le Moniteur secondaire.

Je vais tenter un positionnement soit milieu (par défaut) soit par ratios de décalage (horizontal et vertical) par rapport à l'écran demandé. Mais pour un positionnement précis, peut-être faut-il aussi pouvoir indiquer les Left et Top.

 

[Lolote83]

Re,
perso, j'ai deux écrans
Ecran de gauche : Coordonnées (x,y)
- Haut Gauche = 0,0
- Bas Gauche = 0,1079
- Haut Droite = 1019,0
- Bas Droite = 1019,1079

Ecran de droite
- Haut Gauche = 1920,0
- Bas Gauche = 1920,1079
- Haut Droite = 3839,0
- Bas Droite = 3839,1079

Avec ces informations, peut être peut-on décaler les UserForms avec Left et Top
@+ Lolote83

 

[TooFatBoy]

Avec ces informations

J'ai un doute en voyant tes données : comment les deux écrans peuvent-ils avoir des coordonnées positives ???

L'écran primaire est-il à gauche ?
Ça expliquerait ces valeurs positives pour les deux écrans, je pense.


[edit]C'est même évident, donc la question ne se pose même pas. [/edit]

 

[Dudu2]

J'ai fait un extract juste pour trouver les dimensions des moniteurs.

 

[Lolote83]

Bonjour @TooFatBoy ,

J'ai un doute en voyant tes données

Qu'attendais tu comme valeurs alors ?
Les données fournies au post#12 sont celles de mes deux écrans quand je positionne la sourie
- En haut à gauche de l'écran de gauche (0,0) en haut à gauche de l'écran de droite (1920,0) etc etc etc