Hogyan mozgassa a Pivot Table szeletelőjét az Excel munkalap lapozásával?

A Pivot Table használatakor szeletelőket illeszthet be az adatok vizuális szűréséhez. Ez a cikk arról szól, hogy a Pivot Table szeletelője mindig látható maradjon a munkalap görgetése közben.

Tartsa a Pivot tábla szeletelőjét VBA kóddal görgető munkalapon

Tartsa a Pivot tábla szeletelőjét VBA kóddal görgető munkalapon

A következő VBA-szkript segíthet abban, hogy a Pivot-tábla szeletelője munkalappal mozogjon. Kérjük, tegye a következőket.

1. megnyomni a más + F11 gombok egyszerre a Microsoft Visual Basic for Applications ablak.

2. Ban,-ben Microsoft Visual Basic for Applications ablakban kattintson duplán Ez a munkafüzet a bal oldali Projekt ablaktáblán, majd másolja és illessze be az alábbi VBA kódot a Ez a munkafüzet (kód) ablak. Lásd a képernyőképet:

VBA kód: A Pivot Table szeletelőjét folyamatosan mozgassa munkalap görgetésével

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

Megjegyzések:

1). A kódban az 1. oszlop és a 2. oszlop a szeletelők nevei.

2). Megadhatja a szeletelők helyzetét, miközben görgeti a munkalapot a kódban.

3). És felvehet további szeletelőket a kódba, vagy szükség szerint eltávolíthatja a szeletelőket.

3. megnyomni a más + Q gombok a Microsoft Visual Basic for Applications ablak párbeszédpanel.

Ezentúl a megadott szeletelőket az aktív cellával együtt áthelyezik a munkalap görgetése közben. Lásd a képernyőképet:

Kapcsolódó cikkek:

• Hogyan lehet a táblázatot kibővíteni úgy, hogy táblázat sorokat illeszt be egy védett munkalapba az Excelben?
• Hogyan lehet kombinálni a cellákat és megtartani a cellák formázását az Excelben?
• Hogyan lehet eltávolítani az ismétlődéseket, de első példányt megtartani az Excelben?