Главная страница
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.032 c
15-1169417054
Xyper
2007-01-22 01:04
2007.02.11
AT команды


8-1150388501
***(H@kker)***
2006-06-15 20:21
2007.02.11
Экспорт модели


1-1166445693
SergeD
2006-12-18 15:41
2007.02.11
Программная смена картинки в


2-1169556864
kyn66
2007-01-23 15:54
2007.02.11
У ListBox глючит событие ListBox1DrawItem ???


2-1169798557
whitebarin
2007-01-26 11:02
2007.02.11
Version info автоматическое увеличение счетчика