Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Обращение к кнопке / 16 сообщений из 16, страница 1 из 1
10.03.2006, 15:53:01
    #33593220
talgat
talgat
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обращение к кнопке
один код находится под Private Sub CommandButton1_Click()
другой под Private Sub CommandButton2_Click()
из программки под Private Sub CommandButton2_Click() возможно вызвать программу находящуюся под Private Sub CommandButton1_Click() ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.03.2006, 16:03:59
    #33593256
Пользователь2
Пользователь2
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обращение к кнопке
Кнопки где, на листах или на формах?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.03.2006, 16:04:25
    #33593258
talgat
talgat
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обращение к кнопке
Или может можно программно эмитировать нажатие кнопки 1 ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.03.2006, 16:05:11
    #33593259
talgat
talgat
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обращение к кнопке
Пользователь2Кнопки где, на листах или на формах?
Все находится на одном листе.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.03.2006, 16:26:25
    #33593334
vkodor
vkodor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обращение к кнопке
вроде работает.
Private Sub CommandButton1_Click()
MsgBox "A"
End Sub

Private Sub CommandButton2_Click()
CommandButton1_Click
End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.03.2006, 16:44:30
    #33593406
talgat
talgat
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обращение к кнопке
vkodorвроде работает.
Private Sub CommandButton1_Click()
MsgBox "A"
End Sub

Private Sub CommandButton2_Click()
CommandButton1_Click
End Sub
Огромное спасибо! Вычитал или методои тыка?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.03.2006, 23:07:41
    #33594004
Пользователь2
Пользователь2
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обращение к кнопке
talgat, а почему сам не попробовал, ведь все довольно-таки просто.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.03.2006, 16:13:30
    #33594448
talgat
talgat
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обращение к кнопке
Пользователь2talgat, а почему сам не попробовал, ведь все довольно-таки просто.
Не ожидал, что это так просто. Теперь в похожих ситуациях буду экспериментировать
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.03.2006, 09:14:37
    #33595539
vkodor
vkodor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обращение к кнопке
talgatОгромное спасибо! Вычитал или методом тыка?

Почему-то алгоритм всегда один и тот же.
Сначало старый добрый "тык", потом книги, потом форум.

talgatНе ожидал, что это так просто. Теперь в похожих ситуациях буду экспериментировать
иногда приводит к нежелательным эфектам
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Период между сообщениями больше года.
03.05.2007, 12:13:21
    #34501662
yurikz
yurikz
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обращение к кнопке
вопрос почти тот же

один код находится под Private Sub CommandButton1_Click() на листе1
другой под Private Sub CommandButton2_Click() на листе2

из Private Sub CommandButton2_Click() или из макроса возможно вызвать Private Sub CommandButton1_Click() ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.05.2007, 12:58:16
    #34501881
Deggasad
Deggasad
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обращение к кнопке
А зачем?
Можно ведь на одну и ту же процедуру сослаться


Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
Private Sub CommandButton1_Click()
[color=blue]Macro1[/color]
End Sub


Private Sub CommandButton2_Click()
...
...
[color=blue]Macro1[/color]

End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.05.2007, 12:58:52
    #34501883
Deggasad
Deggasad
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обращение к кнопке
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
Private Sub CommandButton1_Click()
Macros1
End Sub


Private Sub CommandButton2_Click()
...
...
Macros1

End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.05.2007, 13:16:24
    #34501960
yurikz
yurikz
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обращение к кнопке
мне нужно что-то типа этого

Sub Макрос1()

лист1.CommandButton2_Click()

End Sub

условие: CommandButton2_Click() находится на листе1
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.05.2007, 14:30:32
    #34502289
lena_####
lena_####
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обращение к кнопке
yurikz

Просто в модуле класса Worksheet, где у Вас живет обработчик события:
Код: plaintext
Private Sub CommandButton1_Click()
измените область видимости этой процедуры на Public:
Код: plaintext
Public Sub CommandButton1_Click()
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.05.2007, 14:32:22
    #34502301
lena_####
lena_####
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обращение к кнопке
ну и потом вызывайте этот обработчик из обычного модуля
Код: plaintext
1.
2.
Sub s_mySub()
  Worksheets("Лист1").CommandButton1_Click
End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.05.2007, 14:57:11
    #34502414
yurikz
yurikz
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Обращение к кнопке
lena_####

большое спасибо
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Обращение к кнопке / 16 сообщений из 16, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 360ms
Закрыть
start [/forum/topic.php?fid=61&mobile=1&tid=2183033]:
 0ms
get settings:
 9ms
get forum list:
 18ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 50ms
get topic data:
 10ms
get forum data:
 2ms
get page messages:
 69ms
get tp. blocked users:
 1ms
others: 195ms
total:  360ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]