AXForum  
Вернуться   AXForum > Microsoft Dynamics AX > DAX: Программирование
All
Забыли пароль?
Зарегистрироваться Правила Справка Пользователи Сообщения за день Поиск Все разделы прочитаны

 
 
Опции темы Поиск в этой теме Опции просмотра
Старый 02.11.2015, 19:23   #1  
Art_Tanis is offline
Art_Tanis
Участник
 
225 / 36 (2) +++
Регистрация: 04.02.2014
Сводная таблица
Добрый день!
Не получается побороть вот этот момент при построении свобной таблицы через COM

Код:
PHP код:
    for (iPivotField 1iPivotField <= conlen(["@SYS97724","@HTC259","@HTC260"]); iPivotField++)
    {
        
comPivotField comPivotTable.PivotFields(conPeek(["@SYS97724","@HTC259","@HTC260"], iPivotField));
        
comPivotField.Orientation(2); //xlColumnField
        
comPivotField.Position(iPivotField);
        
comPivotField.Subtotals(1,false);
    }

    for (
iPivotField 1iPivotField <= conlen(["@SYS4922"]); iPivotField++)
    {
        
comPivotField comPivotTable.PivotFields(conPeek(["@SYS4922"], iPivotField));
        
comPivotField.Orientation(1); //xlRowField
        
comPivotField.Position(iPivotField);
        
comPivotField.Subtotals(1,false);
    }

    for (
iPivotField 1iPivotField <= conLen(["@SYS97724","@HTC259","@HTC260"]); iPivotField++)
    {
        
comPivotTable.AddDataField(comPivotTable.PivotFields(conPeek(["@SYS97724","@HTC259","@HTC260"], iPivotField)));
    } 
В итоге выходит вот так.
Нажмите на изображение для увеличения
Название: Selection_002.png
Просмотров: 368
Размер:	42.8 Кб
ID:	9421

А надо вот так.
Нажмите на изображение для увеличения
Название: Selection_003.png
Просмотров: 574
Размер:	31.4 Кб
ID:	9422

Подскажите пожалуйста в чем косяк.
Старый 02.11.2015, 20:22   #2  
Ivanhoe is offline
Ivanhoe
Участник
Аватар для Ivanhoe
Лучший по профессии 2017
Лучший по профессии 2015
Лучший по профессии 2014
Лучший по профессии AXAWARD 2013
Лучший по профессии 2011
 
4,143 / 2155 (80) +++++++++
Регистрация: 29.09.2005
Адрес: Санкт-Петербург
Хорошее обсуждение по ссылке ниже. В т.ч. я там примеры проектов выкладывал
Сводные таблицы и Olap в Dax2009
__________________
Ivanhoe as is..
За это сообщение автора поблагодарили: mazzy (2).
Старый 03.11.2015, 11:06   #3  
Art_Tanis is offline
Art_Tanis
Участник
 
225 / 36 (2) +++
Регистрация: 04.02.2014
Надо добавить ориентацию для DataPivotField
VBA
X++:
    Dim objTable As PivotTable, objField As PivotField
    
    ' Select the sheet and first cell of the table that contains the data.
    ActiveWorkbook.Sheets("Employees").Select
    Range("A1").Select
    
    ' Create the PivotTable object based on the Employee data on Sheet1.
    Set objTable = Sheet1.PivotTableWizard
    
    ' Specify row and column fields.
    Set objField = objTable.PivotFields("DEPT")
    objField.Orientation = xlRowField
    Set objField = objTable.PivotFields("LOCATION")
    objField.Orientation = xlColumnField
    
    ' Specify a data field with its summary
    ' function and format.
    Set objField = objTable.PivotFields("SALARY")
    objField.Orientation = xlDataField
    objField.Function = xlSum
    objField.NumberFormat = "$ #,##0"
    
    
           
    Set objField = objTable.PivotFields("RAISE")
    objField.Orientation = xlDataField
    objField.Function = xlSum
    objField.NumberFormat = "$ #,##0"
   

    objTable.DataPivotField.Orientation = xlColumnField
В моем же случае надо в конец добавить строку
X++:
    comPivotField = comPivotTable.DataPivotField();
    comPivotField.Orientation(2);
Старый 03.11.2015, 11:55   #4  
CHESER85 is offline
CHESER85
Участник
 
93 / 11 (1) +
Регистрация: 04.08.2011
Адрес: Ufa
Записей в блоге: 1
Как вариант можно в шаблоне создать какую угодно сводную таблицу, выгрузить исходные данные и потом программно обновить сводную таблицу.
 

Похожие темы
Тема Автор Раздел Ответов Посл. сообщение
Сводная таблица на форме через ADO.Recordset refined DAX: Программирование 3 05.03.2011 12:25
Сводная таблица. Сворачивание Andrux DAX: Программирование 2 03.08.2010 16:17
Сводная таблица xconsul DAX: Функционал 10 31.01.2007 15:26
select sum(amount) from временная таблица ATimTim DAX: Программирование 6 11.06.2004 14:16
Copyof Сводная таблица xconsul DAX: Программирование 0 19.05.2004 13:49
Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход

Рейтинг@Mail.ru
Часовой пояс GMT +3, время: 14:12.
Powered by vBulletin® v3.8.5. Перевод: zCarot
Контактная информация, Реклама.