Newsgroup: it.comp.lang.visual-basic
Titolo: Modifica Menu Excel da VBA

Ciao a tutti
come si fa in Excel a eliminare i menu e delle barre dei comandi in modo
temporaneo,
ovvero solo per una cartella di lavoro specificata e non per tutte in
generale?
                Grazie Ema

 come si fa in Excel a eliminare i menu e delle barre dei
comandi in modo temporaneo, ovvero solo per una cartella di
lavoro specificata e non per tutte in generale?
Comincia con questo esperimento: apri Excel e due cartelle di
lavoro Cartel1 e Cartel2 quindi aggiungi il codice seguente
negli eventi Activate e Deactivate del modulo ThisWorkbook di
Cartel1:
    Option Explicit
    Private Sub Workbook_Activate()
      MsgBox "Activate", , Name
    End Sub
    Private Sub Workbook_Deactivate()
      MsgBox "Dectivate", , Name
    End Sub
poi
    Visualizza >Microsoft Excel
    -o meglio-
    Alt+F11
e sperimenta l'effetto con Ctrl+F6.
Ora siamo pronti a "darci dentro" con le barre:
    Option Explicit
    Private Sub Workbook_Activate()
      With Application.CommandBars
        Let .Item("Standard").Visible = False
        Let .Item("Formatting").Visible = False
      End With
    End Sub
    Private Sub Workbook_Deactivate()
      With Application.CommandBars
        Let .Item("Standard").Visible = True
        Let .Item("Formatting").Visible = True
      End With
    End Sub
Per conoscere i nomi delle barre rendi visibile la ributtante
"Finestra immediata", che sarebbe poi la finestra "Debug", per
gli amici Controlgi`, e sperimenta cosi`:
    ?commandbars(0).name
    <indice non incluso nell'intervallo>
    ?commandbars(1).name
    Worksheet Menu Bar
    ?commandbars(2).name
    Chart Menu Bar
Arrivato a questo punto hai capito l'antifona e sei pronto per
farti un
    For Each .. In CommandBars
che ti dara` i nomi ufficiali delle barre e, se vuoi, anche
quelli "localizzati", usando NameLocal al posto di Name, tipo:
"Worksheet Menu Bar/Barra dei menu foglio di lavoro".
Da usare con oculatezza se si prevede, o si spera, che i
nostri lavori debbano girare oltre che sulla macchina di
sviluppo anche su un'altra macchina che, per definizione, e`
configurata in modo subdolamente identico alla nostra.
Cioe` in realta` (si scopre DOPO) solo il pulsante di
accensione/spegnimento e quello di estrazione floppy sono
identici ai nostri. Ma invertiti.
--
Ciao.
Maurizio

 Credo che sia un problema di tutti gli applicativi Office in
generale.
E`, chiamiamolo cosi`, il:
*Problema dell'impiegato e dell'addetto alle pulizie*
Quando la mattina l'impiegato entra in ufficio si aspetta
di trovare la scrivania pulita e tutte le cose dove le aveva
lasciate.
Se trova il telefono a sinistra invece che a destra puo`:
. dire "azz...", rimetterlo dove preferisce e continuare la
sua giornata;
. non telefonare mai piu` perche` *non trova il telefono* (con
conseguente licenziamento, si spera). Tra parentesi, questo
invece e`, probabilmente, il caso tipico dei "capi", che in
queste circostanze possono arrivare anche a cambiare tutti gli
impianti telefonici di tutte le sedi mondiali dell'impresa. O,
a seguito dell'operazione "Ricerca Del Responsabile",
scatenare una guerriglia aziendale con morti e feriti.
M.B.