Несоответствие типа для сводных таблиц

Question

Я вижу, что у некоторых других была аналогичная проблема, но ни одно из решений, которые работали на них (предлагаемые здесь на сайте), похоже, не работает для меня.

Я использую макрос, чтобы создать несколько сводных таблиц. Ежедневно я передаю ему некоторые данные, а затем он разрушает старую сводную таблицу и создает новый w добавленный день. Он работал до сегодняшнего дня, но сегодня сломался.

Когда я запускаю ниже, я получаю ошибку "Тип 13", говоря, существует несоответствие типов:

Set pcPivotCache = ActiveWorkbook.PivotCaches.Create (SourceType: = xlDatabase, SourceData: = _ . Sheets ("RAWDATA") Range ([SaveDataOffset], [SaveDataOffset] .offset ([LastActiveRow] - 1, 6)), версия: = xlPivotTableVersion12)

следующая строка в коде:

Set ptPivotTable = pcPivotCache.CreatePivotTable (TableDestination: = myWs.Range ("B11"))

И предыдущая строка:

KillAllSheetPivots myWs

переменная «myWs "- это лист, который имеет сводную таблицу, которая начинается с B11, и кажется, что она очищается просто отлично, но затем следующая строка разрушает эту ошибку. Даже более странно, если я не передам его сегодняшние данные и просто запустил их на существующие данные (которые теоретически должны быть одинаковыми, уничтожение/создание Pivottable не должно знать, добавлено ли я больше данных) отлично работает , Любая идея, что может быть неправильным или как я могу отлаживать? Может быть, я превысил максимальный размер или что-то в этом роде? Сейчас я в> 65000 строк.

Answer 1

Кажется, что лист был создан в старом превосходстве, и хотя он теперь находится в новом превосходстве, он все еще думает, что он старый. Таким образом, создание нового листа и копирование макросов и данных для этого должно сделать трюк.