共用方式為


Excel (CalculatedMembers.AddCalculatedMember 方法的 Excel)

會將計算欄位或計算項目新增到樞紐分析表中。

語法

表達。AddCalculatedMember (NameFormulaSolveOrderTypeDisplayFolderMeasureGroupParentHierarchyParentMemberNumberFormat)

代表 CalculatedMembers 物件的變數。

參數

名稱 必要/選用 資料類型 描述
Name 必要 字串 計算成員的名稱。
公式 必要 Variant 計算成員所用的公式。
SolveOrder 選用 Variant 計算成員的求解順序。
類型 選用 Variant 計算成員的類型。
DisplayFolder 選用 Variant 用來顯示計算量值的資料夾。
MeasureGroup 選用 Variant 計算成員所屬的群組。
ParentHierarchy 選用 Variant ParentMember 的父路徑。
ParentMember 選用 Variant 計算成員的母系。
NumberFormat 選用 Variant 用於計算成員的數字格式。

傳回值

CALCULATED成員

註解

Formula 引數必須具有有效的 MDX (多維度運算式) 語法陳述式。 Name 引數必須可供線上分析處理 (OLAP) 提供者接受。

DisplayFolder

顯示資料夾僅對計算量值有效。 它們不適用於計算成員。

可以有分號 ; 在其中。 分號指定多個顯示資料夾。 例如,如果您使用 字串myfolder1;myfolder2,計算量值將顯示在兩個顯示資料夾中,一個名為 myfolder1 ,另一個名為 myfolder2

字串可以有反斜線\。 這會指定顯示資料夾的階層路徑。 例如,如果您使用字串welcome\to\seattle,則會有一個名為 welcome 的顯示資料夾,其中包含一個名為 seattle 的顯示資料夾。 顯示資料夾是虛擬資料夾;它們實際上並不像我們所認為的系統資料夾那樣存在。 它們僅用於顯示計算的量值。

NumberFormat

數字格式只能由巨集設定。 沒有用於設定它們的使用者介面。 這是唯一無法透過使用者介面設定的屬性。 透過使用者介面建立計算成員時,類型一律為 xlNumberFormatTypeDefault 。 數字格式僅對計算成員有效。 它們不適用於計算的量值。

ParentHierarchy

父階層可以是任何有效的 MDX 階層。 父階層僅對計算成員有效。 它們不適用於計算的量值。 如果選擇的父項成員位於不同的父項階層中,則會自動變更父項階層,以符合父項成員的父項階層。 例如,假設計算成員的下列巨集。

     OLEDBConnection.CalculatedMembers.AddCalculatedMember Name:="[UK+US]", _
     Formula:= _
    "[Customer].[Customer Geography].[Country].&[United Kingdom] + [Customer].[Customer Geography].[Country].&[United States] " _
     , Type:=xlCalculatedMember, SolveOrder:=0, ParentHierarchy:= _
     "[Account].[Accounts]", ParentMember:= _
    "[Customer].[Customer Geography].[Australia]", NumberFormat:= _
     xlNumberFormatTypePercent

在此情況下,您已指定母項成員來自 [Customer].[Customer Geography] 階層,但已將父項階層指定為 [Account].[Accounts]。 建立成員時,它將使用父成員的父階層,即 [Customer].[Customer Geography],當您在 UI 的 「管理計算 」對話方塊中查看時,它將顯示 [Customer].[Customer Geography] 為父階層,而不是巨集中指定的階層, [Account].[Accounts]即 。

範例

下列程式碼範例會將 計算量值 新增至樞紐分析表。

注意事項

在這兩個範例中,必須在建立計算之後重新整理樞紐分析表,才能在使用者介面中檢視它。

Sub AddCalculatedMeasure()

Dim pvt As PivotTable
Dim strName As **String**
Dim strFormula As **String**
Dim strDisplayFolder As **String**
Dim strMeasureGroup As **String**

Set pvt = Sheet1.PivotTables("PivotTable1")
strName = "[Measures].[Internet Sales Amount 25 %]"
strFormula = "[Measures].[Internet Sales Amount]*1.25"
strDisplayFolder = "My Folder\Percent Calculations" 
strMeasureGroup = "Internet Sales"

pvt.CalculatedMembers. AddCalculatedMember Name:=strName, Formula:=strFormula, Type:=xlCalculatedMeasure, DisplayFolder:=strDisplayFolder, MeasureGroup:=strMeasureGroup, NumberFormat:=xlNumberFormatTypePercent

End Sub

下列程式碼範例會將 計算成員 新增至樞紐分析表。

Sub AddCalculatedMember()

Dim pvt As PivotTable
Dim strName As **String**
Dim strFormula As **String**
Dim strParentHierarchy As **String**
Dim strParentMember As **String**

Set pvt = Sheet1.PivotTables("PivotTable1")
strName = "[Customer].[Customer Geography].[All Customers].[North America]"
strFormula = "[Customer].[Customer Geography].[Country].&[United States] + [Customer].[Customer Geography].[Country].&[Canada]"
strParentHierarchy = "[Customer].[Customer Geography]"
strParentMember = "[Customer].[Customer Geography].[All Customers]"

pvt.CalculatedMembers. AddCalculatedMember Name:=strName, Formula:=strFormula, Type:=xlCalculatedMember, ParentHierarchy:=strParentHierarchy, ParentMember:=strParentMember, SolveOrder:=0, NumberFormat:=xlNumberFormatTypeDefault

End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應