Run-time error '1004' - Мир MS Excel

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Run-time error '1004' (run-time error '1004': Невозможно получить свойство PivotFie)

Run-time error '1004'

Espada

Дата: Четверг, 11.04.2013, 14:39 | Сообщение № 1

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 121

Репутация: 0 ±

Замечаний: 40% ±

Всем доброго времени суток!!! у меня ребят такая проблемка возникла: при компиляции макроса выскакивает ошибка Run-time error '1004': Невозможно получить свойство PivoFields класса PivotTable. Суть макроса состоит в том чтобы преобразовывать 1 общую таблицу в несколько сводных. а получается что создается 1 и сразу ошибка.

макрос ругается на код:
With ActiveSheet.PivotTables("СводнаяТаблица3").PivotFields("ед. изм") <------на эту строку
.Orientation = xlRowField
.Position = 5

Ребят помогите плиз вы последняя надежда!

К сообщению приложен файл: 3160933.xls (74.0 Kb)

Ответить

Serge_007

Дата: Пятница, 12.04.2013, 00:57 | Сообщение № 2

Группа: Админы

Ранг: Местный житель

Сообщений: 16475

Репутация: 2749 ±

Замечаний: ±

Excel 2016

У Вас в макросе такое громадное количество ошибок, что проще написать его заново
Правил, пока не устал
Сейчас макрос работает до строки
[vba]

Код

j = ActiveSheet.Cells(5, m).Value2

[/vba]
Дальше либо сами, либо ждите что Вам другие помогут

Во вложениях два файла: до работы откорректированного макроса и после

К сообщению приложен файл: Espada1.xls (77.0 Kb) · Espada_2.rar (29.6 Kb)

ЮMoney:41001419691823 | WMR:126292472390

Ответить

Espada

Дата: Пятница, 12.04.2013, 09:09 | Сообщение № 3

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 121

Репутация: 0 ±

Замечаний: 40% ±

Спасибо большое. Теперь буду стараться сам исправить.

Ответить

Espada

Дата: Пятница, 12.04.2013, 12:13 | Сообщение № 4

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 121

Репутация: 0 ±

Замечаний: 40% ±

Оно то создаёт поля но получаются какие-то рандомный таблицы. я вот кидаю пример похожего макроса(под него пытаюсь подогнать) однако он не работает с моей новой таблицей.

К сообщению приложен файл: 1730667.rar (38.3 Kb) · 8632162.xls (99.5 Kb)

Ответить

Run-time error '1004' (run-time error '1004': Невозможно получить свойство PivotFie)

Страница 1 из 1
1