Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Пользователи » ekaterina55
Выбрать дату в календаре…Выбрать дату в календаре

Страницы: 1
Нельзя создать вычисляемое поле, При внешнем источнике данных не отображается кнопка для создания вычисляемого поля
 
#
18.08.2019 15:59:05
Добрый день!
Подскажите, пожалуйста, что нужно сделать для того, чтобы при внешнем источнике данных в сводной таблице работала кнопка для создания вычисляемого поля, то есть было отображение - "Параметры сводной таблицы" - "Поля, элементы и наборы", - "Вычисляемое поле".
Или, возможно, есть еще какие-то способы для вычисления разницы между 2 столбцами в %, но еще и по всем периодам. Например, по оси y - наименования фруктов, по x магазин 1 и магазин 2, и еще выше январь 2019, февраль 2019 и тд, нужно посчитать разницу в % в сводной таблице между 2 магазинами при внешнем источнике данных (данные из БД).
Спасибо!
 
Перейти    
Фильтры диаграммы или как убирать данные в сводной диаграмме без изменений в сводной таблице
 
#
30.04.2019 13:36:35
Добрый день!
Подскажите, пожалуйста, как можно изменить источник данных в сводной таблице и добавить фильтры к диаграмме.
При создании сводной диаграммы выбор источника данных становится не доступным. Надо сделать так, чтобы можно было выбрать.
 
Перейти    
Невозможно получить свойство PivotFields класса PivotTable
 
#
30.01.2019 10:37:09
Здравствуйте!

При запуске макроса возникает данная ошибка:
Цитата
"Невозможно получить свойство PivotFields класса PivotTable"
Подсвечивается данная строка:
With ActiveSheet.PivotTables(namePT).PivotFields( _
       namePF_2).
Код
Sub Doly() 'переключение поля на поле с доп вычислениямиApplication.ScreenUpdating = False
'On Error Resume Next
    
namePF_1 = "Продажи сумма"
namePF_2 = "Доля продаж"
    
namePT = ActiveSheet.PivotTables(1).Name 'имя сводной таблицы
namePF_actual = ActiveSheet.PivotTables(1).DataFields(1).Name 'имя текущего поля с данными

If namePF_actual = namePF_1 Then

    With ActiveSheet.PivotTables(namePT).PivotFields(namePF_1)
        .Function = xlSum
        .Calculation = xlPercentOfColumn
        .NumberFormat = "# ### ##0.00%"
        .Caption = namePF_2
    End With
Else
    With ActiveSheet.PivotTables(namePT).PivotFields( _
        namePF_2)
        .Function = xlSum
        .Calculation = xlNormal
        .NumberFormat = "# ### ##0_р_._-;# ### ##0_р_._-;_-* ""-""_р_._-;_-@_-"
        .Caption = namePF_1
    End With
End If

Application.ScreenUpdating = True
End Sub

Подскажите, пожалуйста, что нужно сделать для исправления ошибки.
Спасибо!
Изменено: ekaterina55 - 30.01.2019 16:59:35
 
Перейти    
Не удается получить данные из базы данных
 
#
17.01.2019 09:14:05
Здравствуйте!
При обновлении в excel появляется ошибка:
"Не удается получить данные из базы данных. Проверьте сервер или обратитесь к администратору базы данных. Убедитесь, что имеется доступ к внешней базе данных, и повторите попытку."
Файл не имеет внешних источников. В итоге сводные таблицы не обновляются.
Подскажите, пожалуйста, в чем проблема.
Изменено: ekaterina55 - 17.01.2019 09:19:15
 
Перейти    
[ Закрыто] Ошибка
 
#
16.01.2019 17:58:44
Здравствуйте!
Подскажите, пожалуйста, в чем проблема.
При обновлении excel появляется ошибка: Не удается получить данные из базы данных. Проверьте сервер или обратитесь к администратору БД.
Файл не имеет внешних источников. В итоге сводные таблицы не обновляются.
Изменено: ekaterina55 - 16.01.2019 17:59:38
 
Перейти    
Страницы: 1
Наверх