Главная страница
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.051 c
1-1165021404
allrussia
2006-12-02 04:03
2007.02.11
Закрепление и привязка компонентов на форме


15-1169144266
iXT
2007-01-18 21:17
2007.02.11
RUS vs ENU


15-1169151730
Kostafey
2007-01-18 23:22
2007.02.11
Пустая таблица в Right Join


15-1169220841
Ricks
2007-01-19 18:34
2007.02.11
Уровень образования


2-1169834817
aht
2007-01-26 21:06
2007.02.11
Поиск в StringGrid