Как сохранить слайсер сводной таблицы с прокруткой листа в Excel?
При работе со сводной таблицей вы можете вставлять срезы для визуальной фильтрации данных в таблице. В этой статье говорится о том, чтобы срез сводной таблицы всегда был видимым при прокрутке рабочего листа.
Продолжайте движение слайсера сводной таблицы с прокруткой листа с помощью кода VBA
Продолжайте движение слайсера сводной таблицы с прокруткой листа с помощью кода VBA
Следующий сценарий VBA может помочь вам сохранить срез сводной таблицы вместе с листом. Пожалуйста, сделайте следующее.
1. нажмите другой + F11 клавиши одновременно, чтобы открыть Microsoft Visual Basic для приложений окно.
2. в Microsoft Visual Basic для приложений окно, дважды щелкните Эта рабочая тетрадь на левой панели проекта, а затем скопируйте и вставьте приведенный ниже код VBA в ThisWorkbook (Код) окно. Смотрите скриншот:
Код VBA: продолжайте движение слайсера сводной таблицы с прокруткой рабочего листа
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
Dim ShF As Shape
Dim ShM As Shape
'specify a slicer
Application.ScreenUpdating = False
Set ShF = ActiveSheet.Shapes("Column1")
Set ShM = ActiveSheet.Shapes("Column2")
'change position of the slicer
With Windows(1).VisibleRange.Cells(1, 1)
ShF.Top = .Top
ShF.Left = .Left + 300
ShM.Top = .Top
ShM.Left = .Left + 100
End With
Application.ScreenUpdating = True
End Sub
Заметки:
1). В коде Column1 и Column2 - это названия срезов.
2). Вы можете указать положение срезов при прокрутке листа в коде.
3). И вы можете добавить в код дополнительные слайсеры или удалить из него по мере необходимости.
3. нажмите другой + Q ключи, чтобы закрыть Microsoft Visual Basic для приложений диалоговое окно окна.
С этого момента указанные срезы будут перемещаться вместе с активной ячейкой при прокрутке листа. Смотрите скриншот:
Статьи по теме:
- Как сохранить расширяемость таблицы, вставив строку таблицы в защищенный лист в Excel?
- Как объединить ячейки и сохранить форматирование ячеек в Excel?
- Как удалить дубликаты, но сохранить первый экземпляр в Excel?
Лучшие инструменты для офисной работы
Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!