Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Сводная таблица - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, Manyasha, SLAVICK, китин  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Сводная таблица (Макросы/Sub)
Сводная таблица
Kemmi Дата: Вторник, 01.09.2020, 14:06 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 8
Репутация: 0 ±
Замечаний: 0% ±

Excel 2013
Здравствуйте. Не работает макрос. Пытаюсь создать сводную таблицу в одной книге, взяв данные из другой книги. Не создается сводная таблица, пишет не допустимое имя поля сводной таблицы. Что неправильно?. Знаю что переменные надо объявить глобально, но как это сделать для разных книг. Или такой вариант вообще не подходит.

Sub England()
Dim rng As Range
Dim PTCache As PivotCache
Dim PT As PivotTable

Set rng = Workbooks("Italia.xlsm"). Worksheets("BD_Italia.xlms").Range("B5").CurrentRegion
Set PTCache = ActiveWorkbook.PivotCaches.Create(xlDatabase, rng .Address)
Set PT = PTCache.CreatePivotTable(Workbooks("England.xlsm"). Worksheets("BD_England").Range("B5:B6"))
 
Ответить
СообщениеЗдравствуйте. Не работает макрос. Пытаюсь создать сводную таблицу в одной книге, взяв данные из другой книги. Не создается сводная таблица, пишет не допустимое имя поля сводной таблицы. Что неправильно?. Знаю что переменные надо объявить глобально, но как это сделать для разных книг. Или такой вариант вообще не подходит.

Sub England()
Dim rng As Range
Dim PTCache As PivotCache
Dim PT As PivotTable

Set rng = Workbooks("Italia.xlsm"). Worksheets("BD_Italia.xlms").Range("B5").CurrentRegion
Set PTCache = ActiveWorkbook.PivotCaches.Create(xlDatabase, rng .Address)
Set PT = PTCache.CreatePivotTable(Workbooks("England.xlsm"). Worksheets("BD_England").Range("B5:B6"))

Автор - Kemmi
Дата добавления - 01.09.2020 в 14:06
Pelena Дата: Вторник, 01.09.2020, 15:59 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 16631
Репутация: 3595 ±
Замечаний: ±

Excel 2010, 2016 & Mac Excel
Kemmi, дайте теме более конкретное название, отражающее суть задачи, в соответствии с Правилами форума и оформите код тегами с помощью кнопки # в режиме правки поста


"Черт возьми, Холмс! Но как??!!"
ЯД 41001765434816
 
Ответить
СообщениеKemmi, дайте теме более конкретное название, отражающее суть задачи, в соответствии с Правилами форума и оформите код тегами с помощью кнопки # в режиме правки поста

Автор - Pelena
Дата добавления - 01.09.2020 в 15:59
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Сводная таблица (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс цитирования
© 2010-2020 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!