Текущий архив: 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.44 MB
Время: 0.043 c