Macro da convalida dati



  • Macro da convalida dati
    di Cristina (utente non iscritto) data: 08/04/2016 09:16:13

    Ciao a tutti, ho bisogno di una mano per la creazione di una macro che in funzione del dato presente in una cella (convalida dati) aggiorni tutte le tabelle pivot presenti sul foglio. Ad esempio se nella cella A1 é presente il valore "1", allora tutti i miei pivot devono avere nel filtro il valore "1". So che dovrei utilizzare la funzione Worksheet.Change ma non riesco ad adattare i campi al mio caso specifico in quanto non sono molto esperta del VBA ma ho la necessità di trovare una soluzione.
    Grazie mille



  • di patel data: 08/04/2016 10:16:40

    allega un file di esempio con i dati ed il risultato desiderato




  • Esempio
    di Cristina (utente non iscritto) data: 08/04/2016 10:56:43

    Ho allegato un file con un semplice esempio. Io vorrei che quando il valore nella cella di convalida dati passa da "Gen" a "Sep", il filtro della mia tabella pivot si aggiorni e diventi anch'esso "Sep" in modo tale da avere solo i dati relativi al mese di settembre.

    Grazie



  • di Albatros54 data: 08/04/2016 15:11:03

    Se ho capito, nel menu a tendina "convalida Dati" inserisci per intero i nomei dei mesi , come li hai inserito nella tabella Pivot, dopo incolla il codice postato nel foglio "Feuil1" e lo esegui.
    Ciao
    albatros54
     
    Sub SelezionaMese()
    mese = Cells(3, 2)
        ActiveSheet.PivotTables("Tableau croisé dynamique1").PivotFields("Mese"). _
            CurrentPage = mese
      End Sub