Как да обновя осевата таблица на защитен лист?
Обикновено обобщената таблица не се опреснява на защитен лист, в тази статия ще представя VBA код за опресняване на обобщената таблица от защитен работен лист.
Опресняване на обобщена таблица на защитен лист с VBA код
Опресняване на обобщена таблица на защитен лист с VBA код
По подразбиране няма директен начин за обновяване на обобщена таблица на защитен лист, но със следния код на VBA можете бързо да опресните всички обобщени таблици на текущия работен лист, когато данните се променят в оригиналната ви таблица.
1. Задръжте надолу ALT + F11 за да отворите Microsoft Visual Basic за приложения прозорец.
2. Щракнете Поставете > Модулии поставете следния код в Модули Window.
VBA код: Обновяване на обобщената таблица на защитен лист:
Sub RefreshAll()
'Updateby Extendoffice 20161109
Dim xpt As PivotTable
With ActiveSheet
.Protect UserInterfaceOnly:=True
For Each xpt In .PivotTables
xpt.RefreshTable
Next xpt
End With
End Sub
3. И след това натиснете F5 за да изпълните този код, ако оригиналните ви данни се променят, всички обобщени таблици в активния лист ще бъдат опреснени наведнъж.
Най-добрите инструменти за продуктивност в офиса
Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време. Щракнете тук, за да получите функцията, от която се нуждаете най-много...
Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна
- Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
- Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!