Наверное глупый вопрос, как можно использовать динамическую переменную в нижеуказанном коде. Нужно чтобы переменной была не фиксированная ячейка, а выделанная на тот момент область из ячеек? Спасибо за помощь.
[vba]
Код
Sub Format_Pivot() ' ' Format_Pivot Macro ' ' Keyboard Shortcut: Ctrl+Shift+F ' Range("B36").Select ActiveSheet.PivotTables("PivotTable2").PivotFields("Type").Subtotals = Array( _ False, False, False, False, False, False, False, False, False, False, False, False) With ActiveSheet.PivotTables("PivotTable2").PivotFields("Type") .LayoutForm = xlTabular .RepeatLabels = True End With End Sub
[/vba]
Доброе утро, день,
Наверное глупый вопрос, как можно использовать динамическую переменную в нижеуказанном коде. Нужно чтобы переменной была не фиксированная ячейка, а выделанная на тот момент область из ячеек? Спасибо за помощь.
[vba]
Код
Sub Format_Pivot() ' ' Format_Pivot Macro ' ' Keyboard Shortcut: Ctrl+Shift+F ' Range("B36").Select ActiveSheet.PivotTables("PivotTable2").PivotFields("Type").Subtotals = Array( _ False, False, False, False, False, False, False, False, False, False, False, False) With ActiveSheet.PivotTables("PivotTable2").PivotFields("Type") .LayoutForm = xlTabular .RepeatLabels = True End With End Sub
Если честно, то без файла трудно работать. Не совсем понятно что вы хотите сделать. Ну а на ваш вопрос, если конечно имелась ввиду Б36, попробуйте заменить просто на Selection
Если честно, то без файла трудно работать. Не совсем понятно что вы хотите сделать. Ну а на ваш вопрос, если конечно имелась ввиду Б36, попробуйте заменить просто на Selectionexcelhelprus