Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 12.10.2010, 12:03   #11
lavrentiyy
Пользователь
 
Регистрация: 28.09.2010
Сообщений: 14
По умолчанию

Ну формула это не важно и сам макрос это не важно.
Это я так образно написал, чтоб потом мысль не потерять
Пробовал
Код:
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
    MsgBox "!!!"
End Sub
все равно не запускается
lavrentiyy вне форума Ответить с цитированием
Старый 12.10.2010, 13:16   #12
doober
Старожил
 
Аватар для doober
 
Регистрация: 02.05.2009
Сообщений: 3,907
По умолчанию

А это код надо вставлять в модуль листа,и вносить непосредственно с макроса.Посмотрите пример(последний).Я код вставлял в событие открития книги.Макрос при открытии созданного файла сработал?
Анализ,обработка данных Недорого
doober вне форума Ответить с цитированием
Старый 12.10.2010, 20:07   #13
lavrentiyy
Пользователь
 
Регистрация: 28.09.2010
Сообщений: 14
По умолчанию

Код:
Set tt = wb.VBProject.VBComponents.Item("Эта книга") 
tt.CodeModule.InsertLines 1, "Private Sub Workbook_Open()" & vbCrLf & " Test" & vbCrLf & "End Sub"
Я так понимаю в этих строчках и заносится функция в код листа.
Может тогда и весь файл в код загрузить.
ЗЫ doober, спасибо огромное, реально помогаешь.
На других форумах только юмористы-петросяны свои языки всовывали
lavrentiyy вне форума Ответить с цитированием
Старый 12.10.2010, 20:50   #14
doober
Старожил
 
Аватар для doober
 
Регистрация: 02.05.2009
Сообщений: 3,907
По умолчанию

В модуль листа так
Код:
Set tt = wb.VBProject.VBComponents.Item("Лист1") 
............................................................
Set tt = wb.VBProject.VBComponents.Item("Лист2")
Анализ,обработка данных Недорого
doober вне форума Ответить с цитированием
Старый 12.10.2010, 21:24   #15
lavrentiyy
Пользователь
 
Регистрация: 28.09.2010
Сообщений: 14
По умолчанию

Понял, буду пробовать.
doober, будь добр, подскажи - возможно ли сделать автоматическую архивацию данных?
lavrentiyy вне форума Ответить с цитированием
Старый 12.10.2010, 22:12   #16
doober
Старожил
 
Аватар для doober
 
Регистрация: 02.05.2009
Сообщений: 3,907
По умолчанию

Если в поиске по форуму набрать волшебное слово АРХИВАЦИЯ,то можно найти здесь ответ
Анализ,обработка данных Недорого
doober вне форума Ответить с цитированием
Старый 14.10.2010, 00:07   #17
lavrentiyy
Пользователь
 
Регистрация: 28.09.2010
Сообщений: 14
По умолчанию

Всем спасибо, господа программисты.
Тему можно считать закрытой.
lavrentiyy вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Автоматическое создание ярлыков Domain Общие вопросы C/C++ 0 01.10.2010 17:17
Создание макроса Ленусик777 Microsoft Office Excel 4 28.05.2010 14:49
Автоматическое создание txt в макросе Evroclidon Microsoft Office Excel 4 26.01.2010 18:32
Создание макроса SeregaSled Microsoft Office Access 2 28.12.2009 05:55
ПОМОЩЬ!!!! Автоматическое создание заявок WWS10 Microsoft Office Excel 5 21.04.2009 20:08