Модераторы: Akina
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Как в VBA корректно прицепить макрос к событию, Не могу подключить макрос к BeforePrint 
:(
    Опции темы
Hmmmm
Дата 6.4.2006, 21:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 3
Регистрация: 6.4.2006

Репутация: нет
Всего: нет



Привет честной компании!

Пишу на Delphi и вот попросили сделать на VBA макрос, который бы изменял структуру листа Excel (убирал некоторые строки в зависимости от наполнения содержимым таблицы) перед наступлением события Print. Думал, что сделаю это одним махом, как в Delphi, но никак lol

Написал макрос в Module1

sub Reform()
... далее не суть важно, например,
Cells(1,1)=1
...

Нашел к чему зацепится
(правда не пойму где здесь правильно записать)
Написал в секции макроса Module1

Private Sub List1_WorkbookBeforePrint(List1, Cancel)
Reform
End Sub

Не прет.

Написал в List1 (Code)

Не прет

Написал в Книге1 (Code)

Не прет

Подскажите, как правильно вызвать макрос перед наступлением печати Листа1 (List1)

Спасибо.
PM MAIL   Вверх
~FoX~
Дата 7.4.2006, 08:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


НЕ рыжий!!!
****


Профиль
Группа: Участник Клуба
Сообщений: 2819
Регистрация: 8.10.2003
Где: Зеленоград

Репутация: 10
Всего: 68



Ну вопервых лист в ехселе не имеет события BeforPrint, такое событие есть только у книги.
Цитата(Hmmmm @ 6.4.2006, 22:51 Найти цитируемый пост)
(правда не пойму где здесь правильно записать)
Написал в секции макроса Module1

Во вторых, событие происходи в книге, вот в книге[code=vb] оно и должно лежать

Код

'Код модуля
Public Sub asd()
  MsgBox ("asd")
End Sub


Код

' Код проекта книги
Private Sub Workbook_BeforePrint(Cancel As Boolean)
  asd
End Sub

Все ок.....
Кстати, что за странное объявление?
Цитата
Private Sub List1_WorkbookBeforePrint(List1, Cancel)

Добавлено @ 08:05
Т.е.
В инспекторе объектов кликаем два раза на "Эта книга", в появившемся окне кода в левом верхнем ComboBoxe выбираем WorkBook, в правом верхнем событие BeforePrint,в появившуюся процедуру зафигачиваем макрос smile
Добавлено @ 08:06
З.Ы. Кстати ты форумом ошибся, форум по программированию на для оффиса ниже smile

Это сообщение отредактировал(а) ~FoX~ - 7.4.2006, 08:02


--------------------
user posted image
…множественность никогда не следует полагать без необходимости…
PM MAIL WWW ICQ Jabber   Вверх
Hmmmm
Дата 7.4.2006, 18:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 3
Регистрация: 6.4.2006

Репутация: нет
Всего: нет



Спасибо. Извините, что не в топ, не доглядел
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "VB6"
Akina

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по VB обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • Используйте теги [code=vb][/code] для подсветки кода. Используйтe чекбокс "транслит" (возле кнопок кодов) если у Вас нет русских шрифтов.


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | VB6 | Следующая тема »


 




[ Время генерации скрипта: 0.0586 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.