Через "ПОЛУЧИТЬ.ДАННЫЕ..." вряд ли получится в общем случае. В частных случаях (которые сильно зависят от структуры исходных данных и измерений) - чисто гипотетически (я не проверял) можно поиграться добавлением в сводную таблицу дополнительных вычисляемых полей, которые придется отображать в области данных (что, на мой взгляд, криво).
Поэтому, имхо, проще пойти "в лоб" - через UDF (User Defined Function). Создаете в VBA функцию примерно такого содержания:
PHP код:
Public Function PivotFieldCount(pivotTableName As String, _
fieldName As String, _
Optional sheetName As String) As Integer
Dim sheet As Worksheet
Dim pivot As PivotTable
Dim field As PivotField
If sheetName = "" Then
Set sheet = ActiveSheet
Else
Set sheet = Worksheets(sheetName)
End If
Set pivot = sheet.PivotTables(pivotTableName)
Set field = pivot.PivotFields(fieldName)
PivotFieldCount = field.PivotItems.Count
End Function
И вставляете в нужной ячейке соответствующий вызов:
Код:
=PivotFieldCount("СводнаяТаблица1";"Дата";"Лист4")
Значения первого и последнего элемента - по аналогии, или даже стандартными формулами =МИН(), =МАКС() по исходному диапазону.
Небольшое замечание: будьте внимательны с подсчетом значений в поле сводной. Если данные в исходном диапазоне редактируются или удаляются, то
даже после обновления сводной таблицы в ней останутся "закэшированными" удаленные даты. Они не будут отображаться, но будут храниться где-то внутри, как возможные значения поля, соответственно влияя на подсчет элементов.