библиотеки для vba Excel

[yura613]

Знает ли кто нибудь как создавть библиотеки для Экселя. Или где почитать можно или увидеть примеры.
Для чего это надо.Я ща практикуюсь в бухгалтерии и работаю постоянно в экселе. Написал себе несколько макросов, которые значительно облегчили мне жизнь, но не окончательно. Из за того что мне приходится работать с большим количеством одинаковых файлов(например: Отчет за такой то период, такой то фирмы), я вынуждет каждый раз копировать макросы и формы из файла в файл, а хотелось бы написать один раз, а потом все время вызывать код и форму без всей этой канители. Слышал что эту проблему можно решить при помощи библиотек. Если есть другие варианты, буду тоже рад.

[GSerg]

Пишешь код в книге.
Файл - Сохранить как - Надстройка (xla)
Собственно всё.

[yura613]

И что потом.
Попробовал я написать код в книге. После сохранил. Расширения такого у меня не предусмотрено, пришлось в ручную сохранять. В итоге тот же файл только с другим расширением. Можно ли по подробнее этот момент и как работает.

[yura613]

В итоге этот файл(настройка) ничем не отличается от старого екселевскго файла. Может к нему потом как то ссылаться надо или подключать ее нужно. Непонятно ))))

[Nicky]

Свойство книги IsAddin = True, сохрани в \Program Files\Microsoft Office\Office\XLStart, по тексту ThisDocument меняй на ActiveDocument, выноси функционал на панель и юзай

[GSerg]

Nicky, это извращённый путь.

yura613
Тип файла "Надстройка Microsoft Excel (*.xla)" есть. Смотри лучше просто.

[yura613]

GSerg извиняюсь, поторопился и не заметил что есть скрол сбоку, когда сохраняешь файл, действительно есть такой формат, но это пол беды.
Мои действия: 1 создаю книгу(example)
2 пишу в ней макрос (при нажатии комбинации клавиш выскакивае форма, с надписью "привет")
3 сохраняю эту книгу как настройку.
4 после создаю новый файл, захожу в сервис > настройки выбираю свою книгу(example), ставлю галочку напротив нее.
5 жму комбинацию клавиш... не работает...
что не так?

[yura613]

для Nicky делаю первые 2 действия(см. список действий выше)
дальше жму Alt + f11 , выбираю моя книга и в свойствах делаю addin=true. после чего возникает такая штука: все страницы куда то исчезают, а когда заходишь в меню файл сохранить так там даже возможности такой нет, все заблокировано. Где ошибка?

[GSerg]

А каким же образом excel узнаёт, что при нажатии этих клавиш надо что-то запустить?

[Nicky]

2yura613: Сначала сохрани, потом поставь true, потом еще раз сохрани

2GSerg: В чем _принципиальная_ разница?

[yura613]

GSerg
я делал пример:создал меню, на меню создал кнопку, которая запускала макрос. После сохранил эту книгу. И при открытии любой книги у меня везде есть мое новое меню и новая кнопка. В любом фале я нажимаю эту кнопку и он запускает макрос, но при этом сразу же открывается файл в котором сохранена и форма и макрос. Я думал файл сохраненный как настройка, работает по такому же принципу, единственное отличие только в том что при это не открыватся файл с сохраненной в ней формой. А оказывается нет.

[GSerg]

А оказывается да.
Просто что-то не так сделал, видимо.

[yura613]

мои действия:
1 создаю книгу
2 альт ф11 создаю макрос
3 сохраняю книгу как настройка
4 создаю новую книгу
5 подключаю в ней (сервис настройки)книгу с макросом
6 итог- не работает...
где ошибка? в примере с меню Эксель все знает куда идти и что запускать, в этом примере не знает.

[yura613]

Nicky
Все равно не получается. Создал файл, вставил макрос, сохранил.
После открыл его залез в меню Альт Ф11 выставил Тру, и опять тоже самое. Решил может это в другой книге(без макроса) надо выставлять такое свойство, и опять тоже самое, сохранить невозможно

[GSerg]

У книги есть событие open...
В это событии настройка должна создавать свои панели инструментов и/или привязки к клавишам... что, имхо, очевидно...

[Nicky]

Теряю мысль. Что не получается? Сохранить как IsAddin или повесить горячую клавишу? Если сохранить, жми дискетку в редакторе VBA

[Nicky]

2GSerg: и все-таки, в чем?

[GSerg]

В том, что удаление гланд через рот удобнее и правильнее.

[yura613]

Nicky
и вообще путь \Program Files\Microsoft Office\Office\XLStart открыт только для чтения. Я же как ника не дома сижу.

[yura613]

GSerg
именно так и написано, в событии Опен записан макрос который присваивает комбинации клавиш макрос. В этой книге работает(в книге с макросом), а в новой книге не работает(при этом выполнена вся процедура, сохранить как... и тд.).

[GSerg]

интересно, как же присваивает, и в чём же макрос...

[yura613]

этот код в исходном файле работает замечательно:
Private Sub Workbook_Open()
With Application
.OnKey "^r", "openFrm"
End With
End Sub


изначально было написано:

Public Sub Auto_Open()
...
End Sub
но такой вариант немного глючит

[Nicky]

Nicky
и вообще путь \Program Files\Microsoft Office\Office\XLStart открыт только для чтения. Я же как ника не дома сижу.

Сервис - Параметры - Общие - Каталог автозагрузки
2GSerg: Это кому как...

[Nicky]

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

[Nicky]

этот код в исходном файле работает замечательно:
Private Sub Workbook_Open()
With Application
.OnKey "^r", "openFrm"
End With
End Sub


изначально было написано:

Public Sub Auto_Open()
...
End Sub
но такой вариант немного глючит

Указывай имя книги с макросом

[GSerg]

Не надо ничего указывать...

[Nicky]

Не надо ничего указывать...

Признаю

2yura613: книгу в студию

[yura613]

а вот и книга

[Nicky]

Открыл файл, создал еще 5, на любом работает

[yura613]

NickyМожно поэтапно твои действия, может я пойму где моя ошибка