2

すべての選択が完了するまで更新をトリガーせずに、単一のスライサーから複数のスライサー項目を選択および選択解除しようとしています。これは、必要なすべての選択項目を Ctrl キーを押しながらクリックすることで、Excel フロントエンドで非常に簡単に行うことができます。ただし、この動作でマクロを記録して実行すると、選択/選択解除のたびに更新されます (記録されたマクロは、ブロック .Selection = True/False内の一連のステートメントにすぎません)。With

関数を使用してみましたが、フィールドを使用して配列にデータを入力した SlicerCaches.VisibleSlicerItemsList場合でも、1004 アプリケーション エラーがスローされます。SlicerItem.Name

Dim tntw(0 To 2) as Variant
For i = 0 To 2
    tntw(i) = sc.SlicerItems(i + 1).Name
Next i
sc.VisibleSlicerItemsList = tntw

また、依存するすべてのピボットテーブルを手動で更新するように設定し、application.calculation を手動に設定しようとしました (そして最後に両方を元に戻します) が、どちらも私が探しているものを達成しませんでした。

何か案は？

4

2 に答える 2