2

1 つの大きなテーブルに大量のエントリが含まれる Excel ワークブックで作業しています。すべてのエントリは日付順に並べ替えられています。月ごとのデータを見やすくするためにスライダーを挿入しましたが、ここでやりたいことは、スライダー オプションが自動的に選択されるようにすることです。

例えば。

私のワークシートの 1 つは、月の概要を表示するように設計されています。すべての合計などは日付に基づいて SUMIF を使用して計算されるため、現在の月のデータのみが合計されます。そのワークシートには、すべてのスライサーも含めたいと考えています。その月のエントリ、十分に簡単ですが、現在の月が自動的に選択されるようにしたいのですが、月次明細書を選択した後、ほとんどの情報を自動的に受け取るのに、明細書の他の部分のために後の月を選択する必要がある場合、人々を混乱させます. だから私が欲しいのは、スライサーのデフォルトを別のセルに設定された値にする方法です。

4

1 に答える 1

1

.Sliceritems(iIndex).selected何を選択するかを定義するために使用できます。

ラベルが日付であると仮定すると、これは選択を設定する方法です

Sub Macro1()

Dim lIndex As Long
Dim lLoop As Long

    With ActiveWorkbook.SlicerCaches("Slicer_NumEntered")
    lIndex = .SlicerItems.Count
        For lLoop = 1 To lIndex
            If CDate(.SlicerItems(lLoop).Name) < CDate("5/1/2012") Then
                .SlicerItems(lLoop).Selected = True
            Else
                .SlicerItems(lLoop).Selected = False
            End If
        Next
    End With
End Sub

これは改善される可能性があります-日付テストはひどいものであり、大幅に改善される可能性があります。また、単にtrue / falseを返すテストを取得できる場合は、を削除してif/then/else、

.SlicerItems(lLoop).Selected = YourTest

代わりは

于 2012-08-13T15:22:47.390 に答える