Excel VBA. Почему изменение свойства name элемента сводной таблицы разрушает объект сводной ячейки?

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

Sub test()

    Dim pc As PivotCell
    Dim pi As PivotItem

    'Set pivotcell object
    Set pc = ActiveCell.PivotCell

    For Each pi In pc.RowItems
        pi.Name = CStr(pi.Name) 'In the very first loop this destroys the pivotcell item
    Next pi

    pc.Range.Select 'Throws 'object required' (424) error

End Sub

0 ответов

Другие вопросы по тегам