aiuto aperture file word in full screen

Question

ciao tutti e grazie in anticipo

io vorrei che i miei file di word si aprino in full screen  schermo intero

qualcuno mi ha detto di creare una macro, io ho provato ma non ci sono riuscito.

Answer 1

ciao e grazie ancora

allora ho fatto cosi

Sub Macro3()

'

' Macro3 Macro

'

'

    ActiveWindow.View.ReadingLayout = Not ActiveWindow.View.ReadingLayout

    Selection.MoveDown Unit:=wdScreen, Count:=3

    ActiveWindow.View.ReadingLayout = Not ActiveWindow.View.ReadingLayout

    If ActiveWindow.View.SplitSpecial = wdPaneNone Then

        ActiveWindow.ActivePane.View.Type = wdPrintView

    Else

        ActiveWindow.View.Type = wdPrintView

    End If

End Sub

solo che adesso quando  lo apro e mi dice avviso di protezione le macro sono state disattivate e bisogna cliccare su opzioni e attiva macro e poi va a tutto schermo

come risolvo che si apre subito a tutto schermo?

Modificando le impostazioni di sicurezza:

1. Pulsante Office
2. Opzioni di Word
3. Centro di protezione
4. Impostazioni centro di protezione

---

--

La soluzione, il codice ed i files sono forniti *così come sono* e l’autore declina ogni responsabilità per eventuali problemi causati dalla soluzione proposta se usata impropriamente. Create e utilizzate una copia del file per le vostre prove, *prima* di utilizzare la soluzione in files importanti.

--

Mauro Gamberini - Microsoft© MVP(Excel)

http://www.maurogsc.eu/

Answer 2

ciao e grazie ancora

allora ho fatto cosi

Sub Macro3()

'

' Macro3 Macro

'

'

    ActiveWindow.View.ReadingLayout = Not ActiveWindow.View.ReadingLayout

    Selection.MoveDown Unit:=wdScreen, Count:=3

    ActiveWindow.View.ReadingLayout = Not ActiveWindow.View.ReadingLayout

    If ActiveWindow.View.SplitSpecial = wdPaneNone Then

        ActiveWindow.ActivePane.View.Type = wdPrintView

    Else

        ActiveWindow.View.Type = wdPrintView

    End If

End Sub

solo che adesso quando  lo apro e mi dice avviso di protezione le macro sono state disattivate e bisogna cliccare su opzioni e attiva macro e poi va a tutto schermo

come risolvo che si apre subito a tutto schermo?

Answer 3

grazie intanto

allora serve ad un amico che suona ed ha le canzoni in formato word e necessita di una volta lanciato il file word che si apra a tutto schermo senza dover andare su visulizzazione e mettere visualizza a tutto schermo, provero' a fare quello che mi dici poi ti faccio sapere se ci riesco

Answer 4

ciao tutti e grazie in anticipo

io vorrei che i miei file di word si aprino in full screen  schermo intero

qualcuno mi ha detto di creare una macro, io ho provato ma non ci sono riuscito.

 

A pieno schermo, cioè tutto nascosto?? Prova così:

1. ALT+F11 e sei nell'editor del vb di Word
2. Individua: Progetto - Project
3. Espandi Normal(click sul pulsantino a forma di +)
4. Doppio click su ThisDocument
5. In alto dove hai il foglio bianco(il modulo del codice) espandi la ComboBox di sx(generale) e seleziona: Documento
6. Nel foglio viene aggiunto l'evento: Private Sub Document_New()
7. Prima di End Sub aggiungi questa riga di codice: ActiveWindow.View.FullScreen = True
8. Salva e chiudi
9. Prova ad aprire un file

---

--

La soluzione, il codice ed i files sono forniti *così come sono* e l’autore declina ogni responsabilità per eventuali problemi causati dalla soluzione proposta se usata impropriamente. Create e utilizzate una copia del file per le vostre prove, *prima* di utilizzare la soluzione in files importanti.

--

Mauro Gamberini - Microsoft© MVP(Excel)

http://www.maurogsc.eu/