Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Запретить изменение значения фильтра в сводной таблице - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Запретить изменение значения фильтра в сводной таблице
danilsergei4 Дата: Вторник, 22.04.2014, 11:48 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 8
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Добрый день.
Стоит задача обеспечивать супервайзеров отчетами по продажам.
Показывать одному супервайзеру продажи других нельзя, поэтому надо фильтровать по супервайзеру.
Хранится все в MS SQL Server.
Если фильтровать на этапе запроса в базу, то тянется все нереально долго. Если вытаскивать данные все вместе, то терпимо.
Возникла идеся. Вытащить данные все, а потом фильтровать уже на уровне сводного отчета. Но при этом запрещать изменения фильтра. Грубо говоря - чтобы в примере нельзя было выбрать другого супервайзера. Но при этом остальные возможности сводной должны быть доступны. Возможно ли это? Как? Спасибо.
К сообщению приложен файл: example_pivot_2.xlsx (12.8 Kb)
 
Ответить
СообщениеДобрый день.
Стоит задача обеспечивать супервайзеров отчетами по продажам.
Показывать одному супервайзеру продажи других нельзя, поэтому надо фильтровать по супервайзеру.
Хранится все в MS SQL Server.
Если фильтровать на этапе запроса в базу, то тянется все нереально долго. Если вытаскивать данные все вместе, то терпимо.
Возникла идеся. Вытащить данные все, а потом фильтровать уже на уровне сводного отчета. Но при этом запрещать изменения фильтра. Грубо говоря - чтобы в примере нельзя было выбрать другого супервайзера. Но при этом остальные возможности сводной должны быть доступны. Возможно ли это? Как? Спасибо.

Автор - danilsergei4
Дата добавления - 22.04.2014 в 11:48
nilem Дата: Вторник, 22.04.2014, 15:49 | Сообщение № 2
Группа: Авторы
Ранг: Старожил
Сообщений: 1613
Репутация: 563 ±
Замечаний: 0% ±

Excel 2013, 2016
Сводную получаете сразу от сервера вот в таком виде? Минуя выгрузку данных на лист?


Яндекс.Деньги 4100159601573

Сообщение отредактировал nilem - Вторник, 22.04.2014, 15:50
 
Ответить
СообщениеСводную получаете сразу от сервера вот в таком виде? Минуя выгрузку данных на лист?

Автор - nilem
Дата добавления - 22.04.2014 в 15:49
tsap Дата: Среда, 23.04.2014, 01:44 | Сообщение № 3
Группа: Проверенные
Ранг: Участник
Сообщений: 60
Репутация: 6 ±
Замечаний: 0% ±

2013
Возможно это подойдет - скрывает выпадающий список фильтра во всех Сводных таблицах книги:
[vba]
Код

Dim pt As PivotTables
Dim ws As Worksheet
Dim i As Integer

For Each ws In ThisWorkbook.Worksheets
If ws.PivotTables.Count <> 0 Then
       For i = 1 To ActiveSheet.PivotTables.Count
           ws.PivotTables(i).PivotFields("Супервайзер").EnableItemSelection = False
       Next i
End If
Next ws
End Sub
[/vba]




Сообщение отредактировал tsap - Среда, 23.04.2014, 01:45
 
Ответить
СообщениеВозможно это подойдет - скрывает выпадающий список фильтра во всех Сводных таблицах книги:
[vba]
Код

Dim pt As PivotTables
Dim ws As Worksheet
Dim i As Integer

For Each ws In ThisWorkbook.Worksheets
If ws.PivotTables.Count <> 0 Then
       For i = 1 To ActiveSheet.PivotTables.Count
           ws.PivotTables(i).PivotFields("Супервайзер").EnableItemSelection = False
       Next i
End If
Next ws
End Sub
[/vba]

Автор - tsap
Дата добавления - 23.04.2014 в 01:44
danilsergei4 Дата: Среда, 23.04.2014, 06:13 | Сообщение № 4
Группа: Пользователи
Ранг: Прохожий
Сообщений: 8
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Сводную получаете сразу от сервера вот в таком виде? Минуя выгрузку данных на лист?

теоретически можно делать выгрузку на лист, но боюсь, что там слишком большой объем будет - в реальности там же и с ТТ выкачивается, и с брендами.
 
Ответить
Сообщение
Сводную получаете сразу от сервера вот в таком виде? Минуя выгрузку данных на лист?

теоретически можно делать выгрузку на лист, но боюсь, что там слишком большой объем будет - в реальности там же и с ТТ выкачивается, и с брендами.

Автор - danilsergei4
Дата добавления - 23.04.2014 в 06:13
danilsergei4 Дата: Среда, 23.04.2014, 06:26 | Сообщение № 5
Группа: Пользователи
Ранг: Прохожий
Сообщений: 8
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Возможно это подойдет - скрывает выпадающий список фильтра во всех Сводных таблицах книги:

спасибо, да, возможно, подойдет. но насколько я понимаю, более-менее грамотный человек сможет посмотреть тут код и выполнить макрос, отменяющий этот. Как можно обезопаситься от такого развития? спасибо.
 
Ответить
Сообщение
Возможно это подойдет - скрывает выпадающий список фильтра во всех Сводных таблицах книги:

спасибо, да, возможно, подойдет. но насколько я понимаю, более-менее грамотный человек сможет посмотреть тут код и выполнить макрос, отменяющий этот. Как можно обезопаситься от такого развития? спасибо.

Автор - danilsergei4
Дата добавления - 23.04.2014 в 06:26
tsap Дата: Среда, 23.04.2014, 23:33 | Сообщение № 6
Группа: Проверенные
Ранг: Участник
Сообщений: 60
Репутация: 6 ±
Замечаний: 0% ±

2013
Описание в файле (макросом скрываем значения фильтра, копируем листы книги в отдельные книги)
К сообщению приложен файл: example_pivot_2.xls (70.5 Kb)




Сообщение отредактировал tsap - Среда, 23.04.2014, 23:33
 
Ответить
СообщениеОписание в файле (макросом скрываем значения фильтра, копируем листы книги в отдельные книги)

Автор - tsap
Дата добавления - 23.04.2014 в 23:33
danilsergei4 Дата: Пятница, 25.04.2014, 08:35 | Сообщение № 7
Группа: Пользователи
Ранг: Прохожий
Сообщений: 8
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Описание в файле (макросом скрываем значения фильтра, копируем листы книги в отдельные книги)

добрый день!
спасибо, но решает ли это проблему? я запустил макрос, создался файл, но если в нем запустить макрос, который делает вместо False True и обновить сводную, то выбирать супервайзеров снова можно.
 
Ответить
Сообщение
Описание в файле (макросом скрываем значения фильтра, копируем листы книги в отдельные книги)

добрый день!
спасибо, но решает ли это проблему? я запустил макрос, создался файл, но если в нем запустить макрос, который делает вместо False True и обновить сводную, то выбирать супервайзеров снова можно.

Автор - danilsergei4
Дата добавления - 25.04.2014 в 08:35
RAN Дата: Пятница, 25.04.2014, 11:09 | Сообщение № 8
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
Вам нужна защита от юзера, или от хакера?
Если от хакера, то у вас один вариант - удалить других супервайзеров из базы. Иначе все равно доберется.


Быть или не быть, вот в чем загвоздка!
 
Ответить
СообщениеВам нужна защита от юзера, или от хакера?
Если от хакера, то у вас один вариант - удалить других супервайзеров из базы. Иначе все равно доберется.

Автор - RAN
Дата добавления - 25.04.2014 в 11:09
danilsergei4 Дата: Вторник, 06.05.2014, 13:02 | Сообщение № 9
Группа: Пользователи
Ранг: Прохожий
Сообщений: 8
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Вам нужна защита от юзера, или от хакера?
Если от хакера, то у вас один вариант - удалить других супервайзеров из базы. Иначе все равно доберется.

да, наверное, так и есть.
оставим так.

сейчас проблема такая: не получается запустить обновляющий по БД макрос, потому что он прерывается ошибкой на картинке. Можно как-то отключить эти уведомления?
Спасибо.
К сообщению приложен файл: 7951088.png (40.6 Kb)
 
Ответить
Сообщение
Вам нужна защита от юзера, или от хакера?
Если от хакера, то у вас один вариант - удалить других супервайзеров из базы. Иначе все равно доберется.

да, наверное, так и есть.
оставим так.

сейчас проблема такая: не получается запустить обновляющий по БД макрос, потому что он прерывается ошибкой на картинке. Можно как-то отключить эти уведомления?
Спасибо.

Автор - danilsergei4
Дата добавления - 06.05.2014 в 13:02
RAN Дата: Вторник, 06.05.2014, 13:11 | Сообщение № 10
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010


Быть или не быть, вот в чем загвоздка!
 
Ответить
СообщениеМяу

Автор - RAN
Дата добавления - 06.05.2014 в 13:11
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!