Страницы: 1
RSS
Вопрос по безопасности:
 
Мое VBA приложение работает при условии, что параметр безопасности для макро отлючен.  
Т. е. в установках Macro Settings: указано:  
(*) Enable all macros (not recommended;...)  
У Юзера установлена опция:  
Disable all macros...  
Я вынужден вручную менять этот параметр у Юзера, а по завершении работы приложения  
восстанавливать начальный параметр.  
Записать макрос для этой процедуры не удалось.  
Вопрос 1: Как автоматически переключать состояние этого параметра?  
Вопрос 2: Возможен ли другой способ решения этой проблемы?  
         Если да, то как?
 
{quote}{login=yefim}{date=02.05.2011 10:44}{thema=Вопрос по безопасности:}{post}Мое VBA приложение работает при условии, что параметр безопасности для макро отлючен.  
Т. е. в установках Macro Settings: указано:  
(*) Enable all macros (not recommended;...)  
У Юзера установлена опция:  
Disable all macros...  
Я вынужден вручную менять этот параметр у Юзера, а по завершении работы приложения  
восстанавливать начальный параметр.  
Записать макрос для этой процедуры не удалось.  
Вопрос 1: Как автоматически переключать состояние этого параметра?  
Вопрос 2: Возможен ли другой способ решения этой проблемы?  
         Если да, то как?{/post}{/quote}  
 
http://www.planetaexcel.ru/forum.php?thread_id=10558
Спасибо
 
Попробуйте такой vbs скрипт:  
 
Dim objExcel  
 
ActivateExcel  
 
Set wb = objExcel.Workbooks.Open ("C:\test.xls")  
wb.Application.OnTime Now, "Macro1"  
 
Private Function ActivateExcel()  
On Error resume next    
Set objExcel = GetObject(, "Excel.Application")  
If objExcel Is Nothing Then  
  Set objExcel = CreateObject("Excel.Application")  
  objExcel.Visible = True  
End If  
End Function  
 
 
Замените "C:\test.xls" и "Macro1" на свои.  
Но выполнение vbs тоже может быть отключено.
 
Посмотрите вариант решения здесь: http://www.planetaexcel.ru/forum.php?thread_id=21472
 
> Возможен ли другой способ решения этой проблемы?  
> Если да, то как?  
 
да очень просто проблема решается...  
вы просто не включайте обратно опцию "Disable all macros...", и всё.  
 
зачем её снова включать? макровирусов уже давно нет, так что беспокоиться не о чем  
(точнее, они, конечно, существуют, но их надо специально искать. За последние несколько лет я открывал тысячи файлов Excel, взятых из разных источников в интернете, - и не встретил ни одного макровируса)
 
у Вас высокий уровень мидихлориан - макровирусы просто боятся..
Живи и дай жить..
 
До запуска файла нажмите и держите Shift.
There is no knowledge that is not power
 
и запуск макросов будет проигнорирован..  
 
но у человека и так макросы отключены..
Живи и дай жить..
 
1. Создайте папку с файлами, которые содержат макросы.  
2. Идём сюда: Файл -> Центр управления безопасностью -> Надёжные расположения -> Добавить новое расположение.  
 
Все макросы, загруженные из этой папки, будут работать. :-)  
 
P.S. Excel 2010.
There is no knowledge that is not power
 
Наверное, не очень понятно написал.  
Идея такая. У юзера так и отключена возможность запуска макросов. Но создав специальную папку и назначив её как "надёжное расположение", то запрет на запуск макросов для файлов из этой папке будет снят. И не надо будет бегать переключать перекоючатели. :-)
There is no knowledge that is not power
Страницы: 1
Читают тему
Наверх
Loading...