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

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

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

Восстановить пароль
Повторная активизация e-mail

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

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 28.04.2008, 13:07   #1
nikolai_P
Форумчанин Подтвердите свой е-майл
 
Регистрация: 28.04.2008
Сообщений: 116
По умолчанию Как приципить макррос на открытие файла?

Мне необходимо чтобы когда открывался файл сразу же происходило событие. Подскажите плиз как это сделать!
nikolai_P вне форума
Старый 28.04.2008, 13:12   #2
дмидми
Форумчанин
 
Аватар для дмидми
 
Регистрация: 06.03.2008
Сообщений: 352
Сообщение

Private Sub Workbook_Open()
в модуле книги, который обычно в русифицированном Excel'е называется ЭтаКнига).
дмидми вне форума
Старый 28.04.2008, 13:57   #3
nikolai_P
Форумчанин Подтвердите свой е-майл
 
Регистрация: 28.04.2008
Сообщений: 116
По умолчанию

В моем файле две кнопки. Я бы хотел, чтобы при открытии файла им автоматически проставлялись имена в соответствии с текущим месяцем и предыдущим.

Я все сделал как вы исказали. При открытия файла у меня появляется ошибка Run-time error '424' Object requried.

Я так понимаю, что мои кнопки создаются после?!
nikolai_P вне форума
Старый 28.04.2008, 13:58   #4
дмидми
Форумчанин
 
Аватар для дмидми
 
Регистрация: 06.03.2008
Сообщений: 352
По умолчанию

Где файл-то?
дмидми вне форума
Старый 28.04.2008, 14:08   #5
nikolai_P
Форумчанин Подтвердите свой е-майл
 
Регистрация: 28.04.2008
Сообщений: 116
По умолчанию

Вот Months.zip
nikolai_P вне форума
Старый 28.04.2008, 14:38   #6
дмидми
Форумчанин
 
Аватар для дмидми
 
Регистрация: 06.03.2008
Сообщений: 352
Лампочка Кто такой, почему не знаю? (с)

Цитата:
Сообщение от nikolai_P Посмотреть сообщение
Я все сделал как вы исказали.
(Польщён, слегка смущён и немного испуган свалившейся на него ответственностью.)
То-то.
Цитата:
Сообщение от nikolai_P Посмотреть сообщение
Я так понимаю, что мои кнопки создаются после?!
Нет.
Но из контекста книги объект But1 не виден, и проект не может обращаться к нему напрямую, о чём и было сообщено. Этот объект известен (принадлежит) листу с кодовым именем Лист1. Поэтому
Код:
Private Sub Workbook_Open()
   'вместо 
   'But1.Caption = 123 
   'нужно
   Лист1.But1.Caption = "123"
End Sub
Кстати: VBA, скорее всего, преобразует число 123 в строку "123", которая требуется свойству Caption, но лучше на это не рассчитывать.
дмидми вне форума
Старый 28.04.2008, 15:31   #7
nikolai_P
Форумчанин Подтвердите свой е-майл
 
Регистрация: 28.04.2008
Сообщений: 116
По умолчанию

Спасибо! Все работает!!!
nikolai_P вне форума
Старый 28.04.2008, 15:40   #8
nikolai_P
Форумчанин Подтвердите свой е-майл
 
Регистрация: 28.04.2008
Сообщений: 116
По умолчанию

А может Вы мне еще подскажите как сделать так, чтобы число месяца преобразовать в название?
Код:
current_month = month(Date) // сегодня 28.04.08,так что current_month = 4
Лист1.But1.Caption = current_month //т.е. как сделать для кнопки название "Апрель"
Не хочется писать кучу если. Выглядеть будет как лузер
nikolai_P вне форума
Старый 28.04.2008, 19:25   #9
дмидми
Форумчанин
 
Аватар для дмидми
 
Регистрация: 06.03.2008
Сообщений: 352
Лампочка Легко!

FormatF1, при необходимости не забыть кликнуть See Also.
Посолить и поперчить по вкусу.
дмидми вне форума
Закрытая тема


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

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Открытие файла Messir_Leonard Win Api 2 09.04.2008 19:33
Открытие файла Veiron Общие вопросы Delphi 2 27.02.2008 03:12
Открытие файла KillbrumX Помощь студентам 5 02.02.2008 20:50
Открытие файла Lexakazanskij Паскаль, Turbo Pascal, PascalABC.NET 9 01.11.2007 22:27