excel - VBA スライサー ブランクを選択

Question

次のような状況があります。「空白」のみを選択する必要があるスライサーを含むシートがあります。空白しかない場合もあれば、空白で1から5の他のオプションがある場合もあります。私の問題は、他のオプションに関係なく、マクロを強制的に空白のままにすることができないことです。私のファイルはテンプレートなので、人々が空白のままにするか、他のものを選択するかはわかりません.

私はいくつかの試みをしました：

With ActiveWorkbook.SlicerCaches("Slicer_OOS_Reason_2017___Performance")

.SlicerItems("(blank)").Selected = True

空白以外があると機能しません:(

   With ActiveWorkbook.SlicerCaches("Slicer_OOS_Reason_2017___Performance")
    .SlicerItems("(blank)").Selected = True
    .SlicerItems("option1").Selected = False
    .SlicerItems("option2").Selected = False
    .SlicerItems("option3").Selected = False
    .SlicerItems("option4").Selected = False
    .SlicerItems("option5").Selected = False
End With

これは、すべてのオプションが利用可能な場合にのみ完全に機能します

1 つのオプションがスライサーにない場合、「無効なプロシージャ コールまたは引数」が表示されます

他のコードを見ましたが、少し迷いました。シンプルなコードが必要です。毎回空白を選択するために他に何も必要ありません:)

リストから各オプションを繰り返す必要はありません。使用可能なオプションの数と名前に関係なく、単一のオプションを選択する必要があります

後で編集:スライサーでオプションが選択されていても、使用するスライサーは古い削除データを表示しません。

ありがとう、ソリン