Classe Actions (Excel VBA)
Uma coleção de todos os objetos Action para a série especificada. Para usar uma variável de classe Actions, ela primeiro precisa ser instanciada por exemplo
Dim acts as Actions
Set acts = ActiveCell.PivotTable.PivotValueCell.ServerActions
Count
Retorna o número de objetos na coleção. Somente leitura Long.
Dim lngCount As Long
lngCount = ActiveCell.PivotTable.PivotValueCell.ServerActions.Count
Item
Retorna um objeto Actions que representa uma coleção de ações em uma pasta de trabalho. Somente leitura.
Item (Index)
Index: Valor de índice da ação.
Dim actItem As Action
Set actItem = ActiveCell.PivotTable.PivotValueCell.ServerActions(Index:=1)