如何创建一个宏，以自动在数据透视表过滤器中选择一个最新日期

Question

嗨，我正在尝试创建一个宏，该宏将在打开文件后运行，并在数据透视表的过滤器中选择最新日期。数据透视表中的数据是从SSAS表格模型中获取的。

Sub LatestDate()

    ActiveWorkbook.SlicerCaches("Slicer_Date").VisibleSlicerItemsList = Array( _
        "[DATE].[Date].&[2019-06-20T00:00:00]")
End Sub