Comment maintenir le segment du tableau croisé dynamique en mouvement avec le défilement de la feuille de calcul dans Excel?

Lorsque vous travaillez avec le tableau croisé dynamique, vous pouvez insérer des segments pour filtrer visuellement les données de la table. Cet article parle de garder le segment du tableau croisé dynamique toujours visible lors du défilement de la feuille de calcul.

Gardez le segment du tableau croisé dynamique en mouvement avec le défilement de la feuille de calcul avec le code VBA

Gardez le segment du tableau croisé dynamique en mouvement avec le défilement de la feuille de calcul avec le code VBA

Le script VBA suivant peut vous aider à maintenir le segment du tableau croisé dynamique en mouvement avec la feuille de calcul. Veuillez faire comme suit.

1. appuie sur le autre + F11 touches simultanément pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

2. dans le Microsoft Visual Basic pour applications fenêtre, double-cliquez Ce classeur dans le volet Projet de gauche, puis copiez et collez le code VBA ci-dessous dans le Ce classeur (code) la fenêtre. Voir la capture d'écran:

Code VBA: Gardez le segment du tableau croisé dynamique en mouvement avec le défilement de la feuille de calcul

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

Florales:

1). Dans le code, Colonne1 et Colonne2 sont les noms des segments.

2). Vous pouvez spécifier la position des segments lors du défilement de la feuille de calcul dans le code.

3). Et vous pouvez ajouter plus de segments dans le code ou en supprimer selon vos besoins.

3. appuie sur le autre + Q touches pour fermer le Microsoft Visual Basic pour applications boîte de dialogue de la fenêtre.

À partir de maintenant, les segments spécifiés seront déplacés avec la cellule active lors du défilement de la feuille de calcul. Voir la capture d'écran:

Articles connexes:

• Comment garder le tableau extensible en insérant une ligne de tableau dans une feuille de calcul protégée dans Excel?
• Comment combiner des cellules et conserver la mise en forme des cellules dans Excel?
• Comment supprimer les doublons mais conserver la première instance dans Excel?