AXForum  
Zurück   AXForum > Microsoft Dynamics NAV > NAV: Программирование
DAX
Kennwort vergessen?
Registrieren Forum Rules Hilfe Benutzerliste Heutige Beiträge Suchen

 
 
Themen-Optionen Thema durchsuchen Ansicht
Alt 31.07.2006, 18:51   #1  
lwg22 ist offline
lwg22
Участник
Benutzerbild von lwg22
 
4 / 10 (1) +
Registriert seit: 24.07.2006
Может кто сталкивался, как убрать итоги у полей в сводной таблице?

Из того, что нарыл сам. В VBA это выглядит примерно так:
ActiveSheet.PivotTables("СводнаяТаблица1").PivotFields("num1").Subtotals = _
Array(False, False, False, False, False, False, False, False, False, False, False, False)

А как эту штуку сделать в Навижн, ума не приложу. Пробовал с Subtotals разные варианты - не получается. Есть у кого идеи?
Alt 07.09.2006, 15:37   #2  
lwg22 ist offline
lwg22
Участник
Benutzerbild von lwg22
 
4 / 10 (1) +
Registriert seit: 24.07.2006
Всем спасибо за моральную поддержку
Интеллет все-таки победил!
Alt 07.09.2006, 15:44   #3  
Yoil ist offline
Yoil
NavAx
NavAx Club
Лучший по профессии 2017
Лучший по профессии 2009
 
1.574 / 70 (6) ++++
Registriert seit: 20.11.2002
Ort: Msk
Ну заодно расскажите, как победили, вдруг еще кому понадобится.
__________________
"Моей лошадке ядрышком полмордочки снесло..."
А.В.Суворов, письма к дочери
Alt 07.09.2006, 15:54   #4  
randrews ist offline
randrews
Участник
Benutzerbild von randrews
 
312 / 10 (1) +
Registriert seit: 06.12.2004
К сожалению, не видел этой темы. Если не получается сделать что-то "экселевское", что могу сделать на VBA, то пишу макрос, а потом его запускаю из Navision
Alt 07.09.2006, 16:21   #5  
lwg22 ist offline
lwg22
Участник
Benutzerbild von lwg22
 
4 / 10 (1) +
Registriert seit: 24.07.2006
Тупо выкладываю весь кусок создания сводной таблицы. Может не все надо (в плане примера), зато точно будет понятно:

Code:
// ========= Сводная таблица по артикулам =======================

  xlPivotCache := xlApp.ActiveWorkbook.PivotCaches.Add(1,STRSUBSTNO('%1!A1:%2%3','Строки', 'G', RowNo));

  xlPivotCache.CreatePivotTable('','PivotTable1');

  xlWorkSheet2 := xlApp.ActiveSheet();
  xlPivotTable := xlWorkSheet2.PivotTables('PivotTable1');
  xlWorkSheet2.Name := 'Сводная Артикулы';

  // Делаем строки
  xlPivotField := xlPivotTable.PivotFields('Код товара');
  xlPivotField.Orientation := 1; //xlRowField
  xlPivotField.Position := 1;
  xlPivotField.Subtotals(1,FALSE);

  xlPivotField := xlPivotTable.PivotFields('Наименование');
  xlPivotField.Orientation := 1; //xlRowField
  xlPivotField.Position := 2;
  xlPivotField.Subtotals(1,FALSE);

  xlPivotField := xlPivotTable.PivotFields('Артикул');
  xlPivotField.Orientation := 1; //xlRowField
  xlPivotField.Position := 3;
  xlPivotField.Subtotals(1,FALSE);

  xlPivotField := xlPivotTable.PivotFields('Кол-во склады');
  xlPivotField.Orientation := 1; //xlRowField
  xlPivotField.Position := 4;
  xlPivotField.Subtotals(1,FALSE);

  // Делаем столбцы
  xlPivotField := xlPivotTable.PivotFields('Транзит');
  xlPivotField.Orientation := 2; //xlColumnField
  xlPivotField.Position := 1;

  // Делаем странички
  xlPivotField := xlPivotTable.PivotFields('Куда');
  xlPivotField.Orientation := 3; //xlPageField
  xlPivotField.Position := 1;

  // Делаем данные
  xlPivotField := xlPivotTable.PivotFields('Кол-во транзит');
  xlPivotField.Orientation := 4; //xlDataField
  xlPivotField.Position := 1;

  xlPivotTable.SmallGrid := FALSE;

  xlWorkSheet2.Range('A:D').Columns.AutoFit;
  xlWorkSheet2.Range('C:D').HorizontalAlignment := 3;
Alt 28.09.2006, 22:37   #6  
Nick V ist offline
Nick V
Участник
 
1 / 10 (1) +
Registriert seit: 28.09.2006
Увааемые господа! Я-новичок. Подскажите, пожалуйста, как сформировать файл, сделанный в EXEL, в Аксапте пока без связи с полями других таблиц (желательно подробнее)
Alt 29.09.2006, 01:20   #7  
Yoil ist offline
Yoil
NavAx
NavAx Club
Лучший по профессии 2017
Лучший по профессии 2009
 
1.574 / 70 (6) ++++
Registriert seit: 20.11.2002
Ort: Msk
Nick V , данная тема, во-первых, конкретно про сводные таблицы, во-вторых - про Navision (Microsoft Dynamics NAV который)
Заведите новую тему в разделе по Axapta, может, там Вам помогут.
__________________
"Моей лошадке ядрышком полмордочки снесло..."
А.В.Суворов, письма к дочери
 


Forumregeln
Es ist Ihnen nicht erlaubt, neue Themen zu verfassen.
Es ist Ihnen nicht erlaubt, auf Beiträge zu antworten.
Es ist Ihnen nicht erlaubt, Anhänge hochzuladen.
Es ist Ihnen nicht erlaubt, Ihre Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Gehe zu

Рейтинг@Mail.ru
Alle Zeitangaben in WEZ +3. Es ist jetzt 17:41 Uhr.
Powered by vBulletin® Version 3.8.5 (Deutsch)
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.