Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.026 c
2-1168613812
AlexanderMS
2007-01-12 17:56
2007.02.11
Включение в исполняемый файл других файлов.


2-1169645465
Графика
2007-01-24 16:31
2007.02.11
Метод канвы TextOut


15-1169024822
lookin
2007-01-17 12:07
2007.02.11
ICQ с телефона


2-1169799293
whitebarin
2007-01-26 11:14
2007.02.11
Сообщение в приветствии WindowsXP, как у AVP 6.0


3-1164180248
MitjaTT
2006-11-22 10:24
2007.02.11
MS SQL 2005 на сервере-хостинге




   Наверх