CubeFields.AddSet-Methode (Excel)
Fügt der CubeFields-Auflistung ein neues CubeField-Objekt hinzu. Das CubeField-Objekt entspricht einer Datenreihe, die für den Cube auf dem OLAP (Online Analytical Processing)-Anbieter definiert wurde.
Syntax
Ausdruck. AddSet (Name, Caption)
Ausdruck Eine Variable, die ein CubeFields-Objekt darstellt.
Parameter
Name | Erforderlich/Optional | Datentyp | Beschreibung |
---|---|---|---|
Name | Erforderlich | String | Ein gültiger Name im SETS-Schemarowset. |
Caption | Erforderlich | String | Eine Zeichenfolge, die das Feld darstellt, das in der PivotTable-Ansicht angezeigt wird. |
Rückgabewert
CubeField
Hinweise
Wenn eine Datenreihe mit dem im Argument Name angegebenen Namen nicht vorhanden ist, gibt die AddSet-Methode einen Laufzeitfehler zurück.
Beispiel
In diesem Beispiel fügt Microsoft Excel dem CubeField-Objekt eine Gruppe mit dem Titel My Set hinzu. In diesem Beispiel wird davon ausgegangen, dass auf dem aktiven Arbeitsblatt ein OLAP-PivotTable-Bericht vorhanden ist und dass ein Feld mit dem Titel Product vorhanden ist.
Sub UseAddSet()
Dim pvtOne As PivotTable
Dim strAdd As String
Dim strFormula As String
Dim cbfOne As CubeField
Set pvtOne = Sheet1.PivotTables(1)
strAdd = "[MySet]"
strFormula = "'{[Product].[All Products].[Food].children}'"
' Establish connection with data source if necessary.
If Not pvtOne.PivotCache.IsConnected Then pvtOne.PivotCache.MakeConnection
' Add a calculated member titled "[MySet]"
pvtOne.CalculatedMembers.Add Name:=strAdd, _
Formula:=strFormula, Type:=xlCalculatedSet
' Add a set to the CubeField object.
Set cbfOne = pvtOne.CubeFields.AddSet(Name:="[MySet]", _
Caption:="My Set")
End Sub
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.