Здравствуйте еще раз!
Плиз, подскажите кто знает..

Проблема: "Необходимо написать макрос, который бы записывал функции в (Mycrosoft excel Object) ThisWorkbook.
более подробно: есть несколько excel-файлов(рабочих книг). в 5 из необходимо записать события на открытие и на активацию/деактивацию листов (записывается это в ThisWortbook). Мне нужно чтобы при запуске макроса само все прописывалось в thisWorkbookактивной книги(не в module)(надеюсь понятно объяснила..). Возможно ли вообще написание подобного макроса? очень благодарна буду за помощь!"

нет, открыть книгу, запустить макрос, который и нагенерит событие на открытие :) (а также на активацию/деактивацию листов)

ммм, а как его туда поместить? (вручную не нужно)
наверное дику туплю.. извиняюсь :(

(просто все макросы ведь в modules записываются..)

спасибо огромное за ответы!, но к сожелению ручками очень нежелательно...

может можно таким путем? : если поместить файл в Application.StartupPath, то все модули становятся доступными для любой открытой книги. может можно сделать так, чтобы и события стали доступными? что-то не становятся :( (privat исправила на Public, ActiveWorkbook использую.)

Огромное спасибо!!!
1 вариант не подойдет, т.к. уже имеются готовые книги и в них нужно прописать события.. :(
Сейчас буду изучать 2-й вариант.

Еще столкнулась с проблемой.
подскажите пожалуйста где необходимо прописать кодировку при записи в файл текста. Нужно чтобы весь текст был обязательно в utf8.
запись произвожу построчно, т.е:


' write replaced file
Open fil For Output As 1
For i2 = 1 To UBound(Text)
For i3 = 0 To i1
Text(i2) = VBA.Replace(Text(i2), params(i3, 0), params(i3, 1))
Next
Print #1, Text(i2)
Next
Close #1

Text(*) - строки текста
params (*,0) - параметры
params (*, 1) - соответствующие значения.

Deggasad, огромное спасибо!!!

кажется, сделала что нужно с помощью событий, которые работают не на уровне одной книги, а на уровне приложения. (все модули и приложения поместила в книгу в Application.StartupPath).

без вас бы гораздо дольше искала как сделать..