[AC-2007] Ouvrir Word en plein écran [Résolu]

[te-kiero]

Bonjour,

Je tente d'ouvrir un fichier word en plein écran avec le code Vba ci-dessous, le fichier word s'ouvre, ne se met pas en plein écran mais est bel et bien ouvert dans la barre des tâches.
Le problème proviendrait de la dernière ligne, mais je ne vois pas lequel ça pourrait être.
Pourriez-vous m'aider s'il vous plait? Merci d'avance.

Code :

1
2
3
4
Private Sub Commande3_Click()
Set Mydoc = GetObject("C:\Users\vdb\Documents\TFE\Règlement_intérieur.docx")
Mydoc.Application.Visible = True
Mydoc.Parent.Windows(1).Visible = True

[te-kiero]

Finalement j'ai réussi à trouver la réponse qui est :

Code :

1
2
3
4
5
6
7
Private Sub Commande3_Click()
Set Mydoc = CreateObject("Word.Application")
Mydoc.Application.Visible = True
Mydoc.Parent.Documents.Open FileName:="C:\Users\vdb\Documents\TFE\Règlement_intérieur.docx"
Mydoc.Windows.Parent.Activate
 
End Sub

Merci quand même, et bonne journée.