Используя вычисляемое поле, чтобы найти процент - PullRequest
0 голосов
/ 24 января 2019

Я пытаюсь рассчитать общий процент по типам оповещений, используя этот столбец. Столбец работает так, что если он равен «1», то он находится во времени обслуживания. Если это «0», то это не так. Я пытаюсь добавить вычисляемое поле, чтобы найти общий процент времени обслуживания от того, сколько типов оповещений было в пределах уровня обслуживания. Но я не уверен, как использовать цикл для подсчета количества «1» и деления его на все возвращаемые значения TTS. Код уже возвращает сводную таблицу. Я просто не уверен, как вернуть дополнительный столбец TTS Percentage. У меня проблемы с последним фрагментом кода.

With xlPT

 With .PivotFields("Generated")
    .Orientation = xlPageField
    '.Position = 1
    .Caption = "Day Generated"
End With

With .PivotFields("Closed")
    .Orientation = xlPageField
    '.Position = 1
    .Caption = "Day Closed"
End With



With .PivotFields("AlertDescription")
    .Orientation = xlRowField
    '.Position = 1
    .Caption = "Alert Description"
End With



With .PivotFields("Status")
    .Orientation = xlColumnField
   ' .Position = 2
    .Caption = "Status"
End With

With .PivotFields("Inbox_Key")
    .Orientation = xlDataField
    .Function = xlCount
    .NumberFormat = "#,##0"
    .Caption = "Count of Status'"
End With

 With .PivotFields("TTS")
    .Orientation = xlRowField
    '.Function = xlCount
    '.NumberFormat = "#,##0"
    .Caption = "Time to Serve"
End With



 With .CalculatedFields.Add("TTS_Total", "=sum(TTS) WHEN TTS = '1'/Count(TTS)")
    .Orientation = xlRowField
    .Function = xlAverage
  .NumberFormat = "0.00%"
    .Caption = "Time to Serve %"
End With  
...