Una famiglia di software per fogli di calcolo Microsoft con strumenti per l'analisi, la creazione di grafici e la comunicazione dei dati.
Funziona, grazie del suggerimento.
Si è presentato però un altro quesito: ho la necessità di proteggere il foglio, mi sono accorto però che se lo proteggo
non mi fa aggiornare i dati della tabella Pivot, in quanto mi viene restituito il seguente messaggio:
"Impossibile eseguire il comando finchè un foglio protetto contiene un altro rapporto di tabella pivot basato sugli stessi dati origine".
Cosa vorrà dire?
grazie
Non ho capito quale foglio devi proteggere. Se è il foglio con la pivot, copia/incolla questa macro in un modulo standard(ALT+F11, Inserisci-->Modulo):
Public Sub m()
Dim sh As Worksheet
Set sh = ThisWorkbook.Worksheets("Foglio4")
Application.ScreenUpdating = False
With sh
.Unprotect Password:="miaPassword"
.PivotTables("Tabella_pivot1").PivotCache.Refresh
.Protect Password:="miaPassword"
End With
Application.ScreenUpdating = True
Set sh = Nothing
End Sub
Sostituisci qui sopra a Foglio4 (lasciando le virgolette) il nome del tuo foglio con la pivot e, sempre fra virgolette, metti la password al posto di miaPassword. ALT+F11 e torni in Excel. ALT+F8, seleziona la macro m, Opzioni, assegna un tasto di scelta rapida(es: CTRL+a). Ok, chiudi la finestra. Adesso per aggiornare la pivot utilizza CTRL+a da qualsiasi foglio del tuo 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)