Bonjour,

Je cherche à créer un petit script qui permet sur un poste double écran de transférer la fenêtre que l'on ouvre vers l'écran approprié. J'utilise pour cela un objet com issu d'un programme qui se nomme ultramon.

j'ai le code suivant :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
 
dim wnd
Set wnd = CreateObject("UltraMon.Window")
 
do while true
	If wnd.Find("Nom fenêtre", "", 1, 0, 0) = True Then
		wnd.Monitor = 2
		wnd.ApplyChanges 0
	End If
loop
c'est tout simple et ça marche (à condition d'avoir installé le logiciel ultramon, evidemment).

Mon problème, c'est que il m'est ensuite impossible de faire glisser manuellement ma fenêtre vers le premier écran car automatiquement elle revient sur le deuxième.

Donc en clair, ce que je voudrais, c'est de ne la tranférer que lors de son ouverture.

j'aurais un petit script donc qui tournerait en tâche de fond et qui à chaque ouverture de fenêtre vérifie par rapport à son nom si elle doit être transférer ou non sur le deuxième écran.