Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.02.11;
Скачать: CL | DM;

Вниз

Сводная таблица в Excel   Найти похожие ветки 

 
SLP ©   (2006-11-20 10:32) [0]

Добрый день!
В программе данные запроса кидаю в Excel и строю сводную таблицу. Все сделала через макросы, кот перевела в D7.
Но сейчас понадобилось в уже готовой сводной таблице выделить жирным шрифтом отдельные объекты.
Сделала макрос:
ActiveSheet.PivotTables("СводнаяТаблица1").PivotSelect _
       ""сельдь  атл       "", xlDataAndLabel
   With Selection.Font
       .Name = "Arial CYR"
       .FontStyle = "полужирный"
       .Size = 10
       .Strikethrough = False
       .Superscript = False
       .Subscript = False
       .OutlineFont = False
       .Shadow = False
       .Underline = xlUnderlineStyleNone
       .ColorIndex = xlAutomatic
   End With  

В программе написала так:
XL.ActiveSheet.PivotTables("СводнаяТаблица1").PivotSelect("сельдь  атл       ",0);
пробовала так....
XL.ActiveSheet.PivotTables("СводнаяТаблица1").PivotSelect("сельдь  атл       ",0) := true;
В VB xlDataAndLabel=0
Но все равно  на этой строчке вылетает ошибка: "элемент не найден. Проверьте, что имя введено верно и такой элемент сводной таблицы существует".
Кто делал, подскажите пож-та как правильно перевести макрос?


 
SLP ©   (2006-11-20 11:55) [1]

Может быть хоть совет какой-нибудь бы дали...Мне не помешает любая информация.


 
ANB ©   (2006-11-20 11:59) [2]

Вообще то ветка к БД отношения не имеет . . .



Страницы: 1 вся ветка

Текущий архив: 2007.02.11;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.029 c
15-1168902926
Германн
2007-01-16 02:15
2007.02.11
Чёрт бы побрал их всех!


2-1169582967
raqy.style
2007-01-23 23:09
2007.02.11
Invalid Floating Point Operation


6-1157965971
dwar
2006-09-11 13:12
2007.02.11
INDY 9 проблемма стоп сервера


2-1169590908
Святослав
2007-01-24 01:21
2007.02.11
Как убрать свойство с published?


15-1169440155
Zeqfreed
2007-01-22 07:29
2007.02.11
Виста это НЕ плагиат с МакОС!