Не удается получить доступ к полю сводной таблицы Excel через строковое значение в VBA - PullRequest
0 голосов
/ 26 апреля 2018

Я пытаюсь получить доступ к полю строки в электронной таблице Excel через макрос VBA

Sub EnableSelectionSelPF()
'pivot table tutorial by contextures.com

'This is the Excel Module that will enable
'the selection for a single piviot table
'column on the first table of the sheet

Dim PT As PivotTable
Dim PF As PivotField
Dim Column As String

Column = "Service Address"

On Error Resume Next
Set PT = ActiveSheet.PivotTables(1)
Set PF = PT.RowFields(Column)
    PF.EnableItemSelection = True
End Sub

Когда я заменяю строковую переменную столбца числовым значением индекса, я могу получить доступ к нужному полю, однако пытаюсь использовать строковую переменную Column или строковое значение, так как индекс для меня не дает результатов.

Я проверил, чтобы PT.RowFields() мог принимать строковые значения, поэтому я не совсем уверен, в чем проблема.

Базовый код, полученный от: Contextures

...