Condividi:        

personalizzare la barra di stato excel 2007

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

personalizzare la barra di stato excel 2007

Postdi papiriof » 04/11/16 17:04

E' possibile personalizzare la barra di stato di excel 2007 ?
Mi spiego nella parte in basso a destra trovo attive le funzioni Somma, Minimo , Massimo e altre di un eventuale intervallo di celle selezionato, la domanda: è possibile immettere in qualche modo anche la funzione "Moda" ?
Win 7+Office 2010
papiriof
Utente Senior
 
Post: 392
Iscritto il: 16/02/10 13:23

Sponsor
 

Re: personalizzare la barra di stato excel 2007

Postdi alfrimpa » 04/11/16 22:12

Avatar utente
alfrimpa
Utente Senior
 
Post: 1201
Iscritto il: 30/12/13 17:01
Località: Napoli

Re: personalizzare la barra di stato excel 2007

Postdi Anthony47 » 05/11/16 03:07

Traduco il suggerimento linkato da Alfredo:
In modo nativo puoi solo scegliere le opzioni che trovi facendo tasto dx sulla barra di status, dove Moda non esiste.
Pero' usando ad esempio l'evento Worksheet_SelectionChange puoi calcolare il dato che vuoi e farlo comparire nella barra di stato, in sostituzione dei messaggi standard di sistema. Nel tuo caso l'istruzione che visualizza Moda potrebbe essere
Codice: Seleziona tutto
Application.StatusBar = Application.WorksheetFunction.Mode(Selection)

Ciao
Avatar utente
Anthony47
Moderatore
 
Post: 19181
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: personalizzare la barra di stato excel 2007

Postdi papiriof » 05/11/16 08:39

Grazie ad Alfredo e Anthony ho risolto in questa maniera:
Codice: Seleziona tutto
 Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   If TypeName(Target) = "Range" Then
        If Target.Cells.Count > 1 Then
        Application.StatusBar = "MODA: " & Application.WorksheetFunction.Mode(Selection)
          '  Application.StatusBar = "My Function: " & _
                                 '   Application.Evaluate( _
                                   '                       "=MODE(" & _
                                  '                         Target.Address & _
                                    '                       ") / (MODE(" & _
                                     '                      Target.Address & _
                                      '                     ") + COUNTBLANK(" & _
                                         '                  Target.Address & _
                                          '               "))" _
                                            '               )
       End If
    End If
End Sub
Win 7+Office 2010
papiriof
Utente Senior
 
Post: 392
Iscritto il: 16/02/10 13:23

Re: personalizzare la barra di stato excel 2007

Postdi papiriof » 07/11/16 18:08

Un piccolo inconveniente: come detto nel messaggio precedente Ho usato una Private Sub che logicamente ho messo nel modulo del foglio dove desideravo che agisse , solo che cambiando foglio (della stessa cartella) allorquando seleziono un intervallo in basso a sinistra compare "Moda:seguito dal numero+frequente" esattamente come se stesse nel foglio dove ho piazzato la Private Sub suddetta.
La cosa non mi dispiace solo che quel "Moda:seguito dal numero+frequente" si va a mettere esattamente dove sta il pulsante per registrare le macro togliendo quest'ultimo ; per farlo riapparire come fare, attualmente devo chiudere la cartella e riaprila...
Win 7+Office 2010
papiriof
Utente Senior
 
Post: 392
Iscritto il: 16/02/10 13:23

Re: personalizzare la barra di stato excel 2007

Postdi papiriof » 07/11/16 18:49

Rettifico parzialmente "Moda:seguito dal numero+frequente" rimane su un altro foglio solo se utilizzo una selezione di almeno 2 celle nel foglio contenente la private sub
Win 7+Office 2010
papiriof
Utente Senior
 
Post: 392
Iscritto il: 16/02/10 13:23

Re: personalizzare la barra di stato excel 2007

Postdi Anthony47 » 08/11/16 00:38

Insomma rimane nella status bar un messaggio congelato, che e' l'ultimo che era stato visualizzato sul foglio dove ti interessava?

Nello stesso modulo dove hai inserito la Sub Worksheet_SelectionChange inserisci:
Codice: Seleziona tutto
Private Sub Worksheet_Deactivate()
Application.StatusBar = ""
End Sub

Ciao
Avatar utente
Anthony47
Moderatore
 
Post: 19181
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: personalizzare la barra di stato excel 2007

Postdi papiriof » 08/11/16 08:01

OK !! così funge,in pratica quando abbandono il foglio si ritorna allo stato normale :) :)
Win 7+Office 2010
papiriof
Utente Senior
 
Post: 392
Iscritto il: 16/02/10 13:23

Re: personalizzare la barra di stato excel 2007

Postdi Anthony47 » 09/11/16 01:16

Cosi' credi che funzioni...
Io temo che devi aggiungere anche queste nel modulo ThisWorkbook:
Codice: Seleziona tutto
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.StatusBar = ""
End Sub

Private Sub Workbook_Deactivate()
Application.StatusBar = ""
End Sub


Chiara la logica?
Avatar utente
Anthony47
Moderatore
 
Post: 19181
Iscritto il: 21/03/06 16:03
Località: Ivrea


Torna a Applicazioni Office Windows


Topic correlati a "personalizzare la barra di stato excel 2007":


Chi c’è in linea

Visitano il forum: Nessuno e 34 ospiti