2

对于这里的专家来说,这是一个非常微不足道的问题:)

我正在尝试使用宏将切片器设置为变量的值。我已经声明了一个字符串变量。

Dim ProductName As String
'+Some code here to assign a value to ProductName (value of a cell)
ActiveWorkbook.SlicerCaches("Slicer_Name1").VisibleSlicerItemsList = Array( _
            "[Team Project].[Project Node Name].&[ProductName]")

这显然行不通,我没想到它会起作用,但我不知道如何让它将 ProductName 视为变量而不是文字。

其余代码很好,因为我可以通过指定产品名称而不使用变量来成功设置切片器。

ActiveWorkbook.SlicerCaches("Slicer_Name1").VisibleSlicerItemsList = Array( _
            "[Team Project].[Project Node Name].&[Bedsheets]")
4

1 回答 1

3

将变量从字符串中取出

Dim ProductName As String
ActiveWorkbook.SlicerCaches("Slicer_Name1").VisibleSlicerItemsList = Array( _
            "[Team Project].[Project Node Name].&[" & ProductName & "]" )
于 2013-08-22T11:50:56.117 回答