Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Срабатывание макроса по кнопке в Excel / 5 сообщений из 5, страница 1 из 1
08.07.2009, 13:49
    #36079849
simprl
simprl
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Срабатывание макроса по кнопке в Excel
Всем добрый день!

У меня такой вопрос:
Написала небоьшой макрос, хочу его распространить среди пользователей (т.е. чтобы он использовался на других компьютерах).

Для этого создала новую панель и на ней кнопку, при нажатии на которую этот макрос срабатывает:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
Sub CreateToolBar()
    Dim TBar As CommandBar
    
    On Error Resume Next
    CommandBars("Prognoz").Delete
    On Error GoTo  0 
        
    Set TBar = CommandBars.Add
    With TBar
        .Name = "Prognoz"
        .Top =  0 
        .Left =  0 
        .Visible = True
    End With

    Dim NewBtn1 As CommandBarButton
    Set NewBtn1 = CommandBars("Prognoz").Controls.Add(Type:=msoControlButton)
            
    With NewBtn1
        .FaceId =  3 
        .OnAction = "PrognozPOS"
        .Caption = " "
    End With
            
End Sub
Все хорошо, макрос отрабатывает, только нажимая на кнопку в нужных мне Excel-их файлах, автоматически открывается тот файл, в котором этот макрос записан. А мне это не надо.

Как избежать открытия файла в таком случае?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.07.2009, 16:17
    #36080256
simprl
simprl
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Срабатывание макроса по кнопке в Excel
Неужели больше ни у кого такой проблемы не было?
Я уже весь инет перерыла, Уокенбаха перелистала - не могу понять, как от этого дуратского открывающегося файла избавиться!!!!!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.07.2009, 12:57
    #36088714
Игорь Горбонос
Игорь Горбонос
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Срабатывание макроса по кнопке в Excel
> Автор: simprl
> Как избежать открытия файла в таком случае?

Никак, для того чтобы код испольнялся он(код) должен быть загружен екселем, для этого можно:
Расположить макрос в персонале для каждого заинтересованного пользователя

Спрятать все листы в книге с макросом

Изменить безопастность на низкую или договорится с админами и выпустить тебе сертификат, которым, ты, подпишешь
макрос, а админы проведут доменную политику и ты станешь доверенным издателем, это для того, чтобы не задавались вопросы
при среднем уровне безопастности и не болькировались макросы при высоком уровне безопастности


Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.07.2009, 13:20
    #36088783
ВasiС
ВasiС
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Срабатывание макроса по кнопке в Excel
Как вариант - подключить макрос в виде надстройки.

Для этого:
1. Сохраняем книгу с макросом в формате *.xla
2. Переносим файл на ПК конечного юзера
3. Через меню: Сервис - Надстройки - Обзор указываем наэтот файл.

Собственно говоря - всё.
Возможно потребуется небольшая доработка твоего кода.
Соль, сахар - по вкусу =)

Результат - макрос можно запустить из любой открытой книги. При этом ничего дополнительно не подгружается.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.07.2009, 00:37
    #36097184
BION
BION
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Срабатывание макроса по кнопке в Excel
Ну или как вариант, это разработка на VB расширения Add-In в виде COM dll. И уже там работать с объектами Excel. Ее так же легко распространять.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Срабатывание макроса по кнопке в Excel / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 358ms
Закрыть
start [/forum/topic.php?fid=60&mobile=1&tid=2160752]:
 0ms
get settings:
 9ms
get forum list:
 17ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 57ms
get topic data:
 12ms
get forum data:
 3ms
get page messages:
 51ms
get tp. blocked users:
 2ms
others: 201ms
total:  358ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]