Opening and Displaying a word file

[AlexSrois]

Hi guys!
Been lurking around the forums for quite a while and really learned much reading you. Thanks a lot.

I'm usually able to work around my problems after doing some research on the forum, but that problem seems so simple I didn't found the answer yet

I have macro assigned to a button on my spreadsheet. When I click the button, I want it to open a specific word file and to display it. At the moment, I'm able to open the word file but it stays minimise. Any way to solve this?

Here is the code I'm working with at the moment ;

Sub Word()
Set wordapp = CreateObject("word.Application")
wordapp.documents.Open "\\clustered_files.cisssbsl.rtss.qc.ca\utilisateurs$\SIAL0102\Desktop\Notes évolutives\00 - UNSORTED.docx"
wordapp.Visible = True
End Sub

Thank you for your help!

 

[AC PORTA VIA]

Try this

Sub Word()
Set wordapp = CreateObject("word.Application")
wordapp.documents.Open "\\clustered_files.cisssbsl.rtss.qc.ca\utilisateurs$\SIAL0102\Desktop\Notes évolutives\00 - UNSORTED.docx"
wordapp.Visible = True
wordapp.Activate
End Sub

 

[rlv01]

You can also adjust the window state.

    With wordapp
        .Activate
        With .ActiveWindow
            .View.Type = 1 'wdNormalView
            .WindowState = 1 'wdWindowStateMaximize
            .ActivePane.View.Zoom.Percentage = 100
            .View.Type = 3 'wdPrintView
        End With
    End With

 

[AlexSrois]

.Activate ?‍ Of course.

@AC PORTA VIA
Thank you for your quick answer, that works perfectly.

@rlv01
Thank you for the precision, this is gonna be usefull!

 

[AC PORTA VIA]

.Activate ?‍ Of course.

@AC PORTA VIA
Thank you for your quick answer, that works perfectly.

@rlv01
Thank you for the precision, this is gonna be usefull!

you are welcome