Копирование сводной таблицы на другой лист, на котором есть другая сводная таблица - PullRequest
0 голосов
/ 13 июля 2020

Я пытаюсь скопировать сводную таблицу из другой книги в другую. Мне удалось скопировать сводную таблицу, но при вставке возникла проблема.

Вот скриншот ошибки

Сообщение об ошибке

А вот мой код

    Dim previous As Workbook
    Dim latest As Workbook

    Application.CutCopyMode = False
    
    previous.Activate
    
    
    Sheets("PD").Select
    ActiveSheet.PivotTables("PivotTable2").TableRange2.Copy
    
    latest.Activate
    
    Worksheets("PD").Activate
    Range("U9").Select
    Selection.End(xlDown).Select
    ActiveCell.Offset(1, 1).Range("A1").Select
    
    Selection.PasteSpecial

Также, пожалуйста, не допускайте, чтобы параметры для сводной таблицы также существовали на целевой странице. Спасибо

1 Ответ

0 голосов
/ 03 сентября 2020

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

...