Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

vba impostare campo Pivot

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

vba impostare campo Pivot

Postdi mirmidone21 » 10/08/16 07:42

buongiorno a tutti
in una macro per creare una Pivot ho le seguenti due righe di codice che in sostanza selezionano lo stesso campo CREDITO_TOTALE nel riquadro dei Valori, solo che di default excel lo imposta come "Conteggio di CREDITO_TOTALE" e poi io devo reimpostarlo come "Somma di CREDITO_TOTALE" perchè mi serve così.
ora la mia domanda è: si può evitare di reimpostarlo due volte e scrivere tutto su una sola istruzione di codice?

grazie a tutti


Codice: Seleziona tutto
ActiveSheet.PivotTables("Tabella_pivot3").AddDataField ActiveSheet.PivotTables( _
        "Tabella_pivot3").PivotFields("CREDITO_TOTALE"), _
        "Conteggio di CREDITO_TOTALE", xlSum


Codice: Seleziona tutto
With ActiveSheet.PivotTables("Tabella_pivot3").PivotFields( _
        "Conteggio di CREDITO_TOTALE")
        .Caption = "Somma di CREDITO_TOTALE"
        .Function = xlSum
Windows 7 sp1 -- Office 2013
Intel i5 4430 -- 3.00 ghz ---- 4gb RAM
mirmidone21
Utente Senior
 
Post: 124
Iscritto il: 26/10/15 16:48

Sponsor
 

Re: vba impostare campo Pivot

Postdi mirmidone21 » 11/08/16 09:22

ho risolto.
posto la mia soluzione sperando che possa essere utile ad altri.

ho modificato la riga d'istruzione in questo modo, è funge perfettamente, imposta direttamente a "SOMMA" e non più a "CONTEGGIO"

Codice: Seleziona tutto
ActiveSheet.PivotTables ("Tabella_pivot3")
    With ActiveSheet.PivotTables("Tabella_pivot3")
    .AddDataField ActiveSheet.PivotTables("Tabella_pivot3").PivotFields("CREDITO_TOTALE"), _
        "Somma di CREDITO_TOTALE", xlSum


saluti a tutti
Windows 7 sp1 -- Office 2013
Intel i5 4430 -- 3.00 ghz ---- 4gb RAM
mirmidone21
Utente Senior
 
Post: 124
Iscritto il: 26/10/15 16:48


Torna a Applicazioni Office Windows


Topic correlati a "vba impostare campo Pivot":


Chi c’è in linea

Visitano il forum: ilPrincipito e 13 ospiti

cron