Темы

С "прогонять" это я перегнул конечно немного.
PS вставка кода почему то не работает, с двух браузеров на компьютере пробовал и с телефона. Ещё вечером в с нетбука попробую. На случай если не заработает каким тегом вручную обозначается код? Чтоб мои сообщения модераторам не приходилось править постоянно

не хотелось создавать новую темя для такой мелочи, но админ прогнал из курилки :D
В общем как вернуть название сводной таблицы на активном листе?
Попытки чтения справки привели к рождению таких строк, которые не работают:

Код Выделить Развернуть

Sub olap()
Dim vA As Variant
vA = ActiveSheet.PivotTables.PivotTableWizard(TableName)
MsgBox vA
End Sub

Всем привет. Ребят это нормально, что в форме регистрации не работает собственно сама кнопка регистрации? Пришлось в код страницы лезть чтоб завершить дело)
ну и чтоб далеко не ходить: как заставить vba вернуть название сводной таблицы?
Вот так не хочет работать, где я что не так делаю?
Sub olap()
Dim vA As Variant
vA = ActiveSheet.PivotTables.PivotTableWizard(TableName)
MsgBox vA
End Sub

P.S. тут есть отдельная форма для вставки кода?