EXCEL: disabilitare riduci ad icona e ingrandisci

[Francesco53]

Buona serata a tutti,
è possibile in Excell bloccare o nascondere i comandi il alto a destra, riduci ad icona e ingrandisci?
Grazie
Francesco

[Flash30005]

Esistono tre stati di visualizzazione finestra

Codice: Seleziona tutto

Application.WindowState = xlMaximized
Application.WindowState = xlNormal
Application.WindowState = xlMinimized

se inserisci questi codici in tre macro diverse vedrai il loro effetto
ora potresti mettere in un foglio o in più fogli che in caso di variazione selezione, calcolo o altro l'avvio della macro interessata
oppure c'è anche la possibilità di disabiltare tutte le barre di excel
fai sapere cosa ti occorre

ciao

[Francesco53]

Buongiorno Flash,
la richiesta fatta è relativa ad un vecchio post in cui avevamo discusso della possibilità di disabilitare
le barre menu di excel, però ho constatato che se si riduce il foglio ad icona, quando lo si riapre,
ricompaiono tutte le barre dei menu, impedendo la visione completa dei dati. Quindi pensavo di
bloccare i tasti vicini alla X su sfondo rosso, per impedire di ridurre ad icona il foglio ed evitare la
ricomparsa delle barre dei menu.
Grazie
Francesco

[Flash30005]

Ci deve essere un errore nel richiamo macro che riabilita le barre
Ricordo che (anche io ne ho fatto uso), le barre venivano disabilitate all'apertura del foglio (ThisWorkbook_open)
e ripristinate alla sua chiusura, con o senza salvataggio del file, nessun altro comando deve richiamare il ripristino barre.

Ciao

[Francesco53]

Ciao Flash, non sò se ci sia errore o meno, solo che se si riduce ad icona il foglio, alla riapertura
ricompaiono le barre. Questo è il problema che vorrei evitare. Ti allego il vecchio post:
http://www.pc-facile.com/forum/viewtopic.php?f=26&t=90786&p=528466#p528466
Grazie
Francesco

[Flash30005]

Ho riletto velocemente l'intero topic linkato
e mi sembra che all'epoca avessi risolto
(in quel topic si parla anche di comando della finestra, anchesso risolto)

ora, dov'è il problema?

ciao

[Francesco53]

Ciao Flash,
il problema è che pur nascondendo le barre dei menu, se si clicca sulla icona "riduci a icona" del foglio,
pone il foglio in basso ad icona, se riprendi il foglio, apre il foglio e sono riabilitate tutte le barre dei menu.
Vorrei che tutto questo non fosse possibile.
Grazie
Francesco

[Flash30005]

Bisognerebbe sapere, alla fine, tra tutti i codice dell'altro topic
quali hai effettivamente utilizzato e dove

Ciao

[Francesco53]

Ciao Flash, ti posto il file di base:
http://www.mediafire.com/?yzxsqeo4sf2sx2y
una volta avviata la macro che nasconde le barre dei menu,
se riduci ad icona il foglio e poi lo ingrandisci, vedi che
le barre dei menu risultano tutte ripristinate, ed è quello
che vorrei non succedesse.
Grazie
Francesco

[Flash30005]

Apri una nuova cartella vuota
nel primo foglio (foglio1) crea una figura e assegna la macro "Chiudi"
In ThisWorkbook inserisci questi codice

Codice: Seleziona tutto

Public blnexit As Boolean

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Cancel = Not blnexit
    If blnexit = False Then
        MsgBox "Utilizzare il pulsante  CHIUDI"
    End If
End Sub

Private Sub Workbook_Open()
    Disattiva_Barre
End Sub


In un modulo inserisci queste macro

Codice: Seleziona tutto

Sub Chiudi_File()
    Application.ScreenUpdating = False
    Riattiva_Barre
    ThisWorkbook.blnexit = True
    Application.ScreenUpdating = True
    ActiveWorkbook.Close
    Application.OnKey "%{f11}"
End Sub

Sub Disattiva_Barre()
    Application.OnKey "%{f11}", ""
    Application.DisplayFormulaBar = False
    Set Barre = Application.CommandBars
    For I = 1 To Application.CommandBars.Count
        Barre(I).Enabled = False
    Next I
End Sub

Sub Riattiva_Barre()
    Application.DisplayFormulaBar = True
    Set Barre = Application.CommandBars
    For I = 1 To Application.CommandBars.Count
        Barre(I).Enabled = True
    Next I
End Sub


Salva il file o premi il Pulsante Chiudi

Riavvia il file

ciao

[Francesco53]

Ciao Flash, ti ringrazio per le risposte, purtroppo il problema persiste.
Se alla tua macro aggiungo:
Application.DisplayFullScreen = True

Codice: Seleziona tutto

     Sub Chiudi_File()
        Application.ScreenUpdating = False
        Riattiva_Barre
        ThisWorkbook.blnexit = True
        Application.ScreenUpdating = True
        ActiveWorkbook.Close
        Application.OnKey "%{f11}"
    End Sub

    Sub Disattiva_Barre()
        Application.OnKey "%{f11}", ""
        Application.DisplayFormulaBar = False
        Application.DisplayFullScreen = True
        Set Barre = Application.CommandBars
        For I = 1 To Application.CommandBars.Count
            Barre(I).Enabled = False
        Next I
    End Sub

    Sub Riattiva_Barre()
        Application.DisplayFormulaBar = True
        Application.DisplayFullScreen = False
        Set Barre = Application.CommandBars
        For I = 1 To Application.CommandBars.Count
            Barre(I).Enabled = True
        Next I
    End Sub

mi nasconde tutti i menu, ma, se riduco ad icona il foglio e poi lo riapro a tutto schermo, mi riappaiono tutte
le barre dei menu. Quello che chiedo, e che riaprendo il foglio, dopo averlo ridotto ad icona, le barre dei menu
devono rimanere nascoste.
Grazie per la tua disponibilità, spero sia chiaro mquello che chiedo.
Francesco

[Flash30005]

Ma tu non devi aggiungere nulla
quelle macro fanno tutto ciò che ti occorre
Disabilitano il comando "X"
Glia altri due tasti continuano a funzionare senza ripristinare le barre
cos'altro vorresti?

Ciao

[Francesco53]

Ciao, purtroppo l'unica barra che nasconde la macro è la formulabar,
le altre rimangono tutte visibili. per questo aggiungo gli altri comqandi.
Il ciclo for next non ha effetto.
Francesco

[Francesco53]

Ho capito cosa succede, se uso Office 2003 funziona, se uso Office 2007 si comporta come ti ho detto.
Se hai la soluzione anche per office 2007 ti sarei grato, altrimenti pazienza.
Grazie
Francesco

[ricky53]

Ciao,
si confermo con il 2007 viene nascosta solo la barra della formula.
Non lo uso molto e non conosco l'organizzazione del Ribbon ma ... vado a memoria: mi sembra di aver letto che ci siano modalità diverse con il 2007 per nascondere le barre.

Potevi dirlo che utilizzavi il 2007 non avremmo impiegato tutto questo tempo a scriverci: ti avrei risposto subito ...