I secondo l'idea di Dave. Non sono sempre appassionato di tabelle pivot, ma in questo caso sono abbastanza semplici da usare.
Qui sono i miei risultati:
Era così semplice per crearla che ho anche registrato una macro in caso di necessità di fare questo con VBA:
Sub Macro2()
'
' Macro2 Macro
'
'
Range("Table1[[#All],[DATA]]").Select
ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _
"Table1", Version:=xlPivotTableVersion14).CreatePivotTable TableDestination _
:="Sheet3!R3C7", TableName:="PivotTable4", DefaultVersion:= _
xlPivotTableVersion14
Sheets("Sheet3").Select
Cells(3, 7).Select
With ActiveSheet.PivotTables("PivotTable4").PivotFields("DATA")
.Orientation = xlRowField
.Position = 1
End With
ActiveSheet.PivotTables("PivotTable4").AddDataField ActiveSheet.PivotTables(_
"PivotTable4").PivotFields("DATA"), "Count of DATA", xlCount
End Sub
Usa ' funzione countif() – vikiiii
Simile a questo [post] (http://stackoverflow.com/questions/15414739/excel-vba-code-to-find-duplicates-in-a-column-and-add-the--orrispondente -valori) –
L'utilizzo del subtotale è un'altra opzione. – pnuts