Nouvelle fenêtre sur 2 écran

Bonjour

j'utilise la macro ci-après pour ouvrir

une feuille sur une nouvelle fenêtre.

et ensuite avec la souris je glisse cette nouvelle fenêtre

sur l'écran 2.

Existe t-il une commande VBA qui permette

de lancer l'ouverture de cette nouvelle fenêtre directement sur

l'écran 2.

Sub ecran2()

ActiveWindow.NewWindow

Call affiche_tab1b

ActiveWindow.Zoom = 66

End Sub

Merci pour votre aide

Pierre_br