ReSQL.ru
     
powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как работать с группированными объектами Active-X
24 сообщений из 24, страница 1 из 1
Как работать с группированными объектами Active-X
    #36600648
Фотография lopuxi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lopuxi
Участник
Конечно не умру если не узнаю, но мне просто вдруг стало интересно, как узнать номер группы сгруппированных в одно целое несколько кнопок или других элементов и в дальнейшем работать с этой группой в коде.

Мне надо всего 4 элемента, надо делать видимыми или не видимыми. Когда прописываешь визибл не визибл, каждому отдельно, они пропадают по очереди в несколько доли сек. И это как то портит все красивую картину
...
Рейтинг: 0 / 0
27.04.2010, 14:08
| Ответить | Цитировать | Написать  
Как работать с группированными объектами Active-X
    #36600685
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Konst_One
Участник
код показывай, а то твои наименования понятий что-то никак не ассоциируются с общепринятыми
...
Рейтинг: 0 / 0
27.04.2010, 14:17
| Ответить | Цитировать | Написать  
Как работать с группированными объектами Active-X
    #36600798
Фотография lopuxi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lopuxi
Участник
Konst_Oneкод показывай, а то твои наименования понятий что-то никак не ассоциируются с общепринятыми

:)) вот
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
Private Sub check_Shortcuts_Click()
 
If check_Shortcuts =  0  Then ' переключатель, chekbox. делает все эти кнопки либо видимыми либо не видимыми.
    cmdaddRow.Visible = False ' кнопка добавить строку
    cmdDeliteRow.Visible = False ' кнопка удалить строку
    Cmd_AddClient.Visible = False ' тож кнопка
    cmd_del_claer.Visible = False ' тож кнопка
    labInfo.Visible = False ' надпись, най выводится текст, что какая кнопка означает.
Else
    cmdaddRow.Visible = True
    cmdDeliteRow.Visible = True
    Cmd_AddClient.Visible = True
    cmd_del_claer.Visible = True
    labInfo.Visible = True
End If
 
End Sub

на фото видно как расположены кнопки. Я хотел объединить их с группировать, выделив все нажав правой кнопкой - объединить - в группу.

Но потом столкнулся с проблемой, как мне с этой объединенной группой этих кнопок работать. Мне хотелось что бы они все разом делались по надобности видимыми, по не надобности не видимыми. Но пришлось прописывать каждую в отдельности.
...
Рейтинг: 0 / 0
27.04.2010, 15:00
| Ответить | Цитировать | Написать  
Как работать с группированными объектами Active-X
    #36600802
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Konst_One
Участник
засовывай свои кнопки во фрейм и его делай Visible или не визибл
...
Рейтинг: 0 / 0
27.04.2010, 15:04
| Ответить | Цитировать | Написать  
Как работать с группированными объектами Active-X
    #36600808
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Konst_Oneзасовывай свои кнопки во фрейм и его делай Visible или не визибл

было уже
...
Рейтинг: 0 / 0
27.04.2010, 15:08
| Ответить | Цитировать | Написать  
Как работать с группированными объектами Active-X
    #36600810
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Shocker.Proбыло уже

Ха, так это был segail
два сапога - пара
...
Рейтинг: 0 / 0
27.04.2010, 15:09
| Ответить | Цитировать | Написать  
Как работать с группированными объектами Active-X
    #36600815
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Konst_One
Участник
индусский код атакует форум
...
Рейтинг: 0 / 0
27.04.2010, 15:10
| Ответить | Цитировать | Написать  
Как работать с группированными объектами Active-X
    #36600862
Фотография lopuxi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lopuxi
Участник
Konst_Oneиндусский код атакует форум

пробовал я в этот frame запихнуть да тока я с ним работать как к сожалению не понял :((
Да и поему этот фрам в ексель не совсем гуд работает.. судя по этой теме http://www.sql.ru/forum/actualthread.aspx?tid=609323

я когда создал в нем кнопки (во frame), я так и не понял, как расположенным в нем элементам, задать действия, например по нажатию на кнопку вывести Userform.
...
Рейтинг: 0 / 0
27.04.2010, 15:27
| Ответить | Цитировать | Написать  
Как работать с группированными объектами Active-X
    #36600870
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Konst_One
Участник
так, началось. опять этот Excel и его UserForms. вам в режиме редактора кода надо вставить элемент управления Группа и в него уже свои кнопки
...
Рейтинг: 0 / 0
27.04.2010, 15:30
| Ответить | Цитировать | Написать  
Как работать с группированными объектами Active-X
    #36600885
Фотография lopuxi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lopuxi
Участник
Konst_Oneтак, началось. опять этот Excel и его UserForms. вам в режиме редактора кода надо вставить элемент управления Группа и в него уже свои кнопки

Нет, не в этом дело. Как бы объяснить.
Я прекрасно знаю как создавать userfor как помещать на нее элементы ActiveX и я знаю как создать во frame кнопки. Дайте мне код, где эти кнопки помещенные во frame работатю.
Ты нажал на нее и что-то случилось. Пусть хоть цвет она поменяет. вот это мне покажите как сделать? Потому что в интернете про этот frame много говорят, а вот как с ним работать в Excel нигде не упоминается.
...
Рейтинг: 0 / 0
27.04.2010, 15:34
| Ответить | Цитировать | Написать  
Как работать с группированными объектами Active-X
    #36600889
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Konst_One
Участник
Группа - это такой же контрол, как и кнопка и имеет свой набор методов и свойств. откройте Object Browser и посмотрите какие и что они значат
...
Рейтинг: 0 / 0
27.04.2010, 15:35
| Ответить | Цитировать | Написать  
Как работать с группированными объектами Active-X
    #36600892
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Konst_One
Участник
Код: plaintext
Me.Frame1.Visible = True

вы это не можете сделать?
...
Рейтинг: 0 / 0
27.04.2010, 15:37
| Ответить | Цитировать | Написать  
Как работать с группированными объектами Active-X
    #36600921
Фотография lopuxi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lopuxi
Участник
Konst_OneГруппа - это такой же контрол, как и кнопка и имеет свой набор методов и свойств. откройте Object Browser и посмотрите какие и что они значат

Либо я не понимаю чего то, либо меня тут по тупому занос водят.
Причем тут тогда про frame говорили? а теперь вдруг возвращаемся опять к группировке элементов?

Так хорошо открыть открыл Object Browser. Как мне теперь там найти методы относящиеся именно к сгруппированным мной только что в месте элементам?
...
Рейтинг: 0 / 0
27.04.2010, 15:44
| Ответить | Цитировать | Написать  
Как работать с группированными объектами Active-X
    #36600932
Фотография lopuxi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lopuxi
Участник
Konst_One
Код: plaintext
Me.Frame1.Visible = True

вы это не можете сделать?

)))) Смешно) Проблема не в том что бы сделать видимый или не видимый frame.
проблема в том как помещенным в него элементам (кнопкам). Задать команды?
Например: (по нажатию на кнопку помещенную в контейнере(frame) поменяла свой цвет).
...
Рейтинг: 0 / 0
27.04.2010, 15:47
| Ответить | Цитировать | Написать  
Как работать с группированными объектами Active-X
    #36600934
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Konst_One
Участник
по слогам

1) открываете дизайнер вашей Userform
2) вытягиваете из тулбокса элемент Frame и кладёте его на вашу формочку
3) перетягиваете ваши кнопочки внутрь этого фрэйма
4) пишите код для вашего чекбокса (он должен быть вне фрейма):

Код: plaintext
1.
2.
Private Sub check_Shortcuts_Click()
Me.Frame1.Visible = Not (check_Shortcuts =  0 )
End sub


4) вуаля
...
Рейтинг: 0 / 0
27.04.2010, 15:47
| Ответить | Цитировать | Написать  
Как работать с группированными объектами Active-X
    #36600939
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Konst_One
Участник
для того чтобы задать код для кнопки его надо написать в редакторе кода модуля вашей книги
...
Рейтинг: 0 / 0
27.04.2010, 15:48
| Ответить | Цитировать | Написать  
Как работать с группированными объектами Active-X
    #36600956
Фотография lopuxi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lopuxi
Участник
Konst_Oneдля того чтобы задать код для кнопки его надо написать в редакторе кода модуля вашей книги

Вот с этого момента давай поподробнее)) Учитывая что с frame я не работал. Обходил его до этого момента стороной.
Щас я попробую создам модуль под фраме и посмотрю что у меня получится.
...
Рейтинг: 0 / 0
27.04.2010, 15:54
| Ответить | Цитировать | Написать  
Как работать с группированными объектами Active-X
    #36600987
Фотография lopuxi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lopuxi
Участник
[quot Konst_One]

У тебя случаем рабочего примера нету? Готового? Я не понимаю, как через модуль обратить к кнопке находящейся в frame.

Я чето не так делаю. Давай может по порядку с простого.
...
Рейтинг: 0 / 0
27.04.2010, 16:05
| Ответить | Цитировать | Написать  
Как работать с группированными объектами Active-X
    #36601014
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Konst_One
Участник
1) открой редактор кода VB в Excel
2) создай новую UserForm
3) накидай контролы, как на картинке:

4) нажми кнопку просмотр кода формы
5) в редакторе кода Userform добавь код:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
Option Explicit

Private Sub CheckBox1_Click()
Me.Frame1.Visible = Not (Me.CheckBox1.Value =  0 )
End Sub

Private Sub CommandButton1_Click()
Me.CommandButton2.ForeColor = vbRed
End Sub

Private Sub CommandButton2_Click()
Me.CommandButton1.ForeColor = vbGreen
End Sub

Private Sub Frame1_Click()
Me.CommandButton1.ForeColor = vbBlack
Me.CommandButton2.ForeColor = vbBlack
End Sub

Private Sub UserForm_Activate()
CheckBox1_Click
End Sub
...
Рейтинг: 0 / 0
27.04.2010, 16:13
| Ответить | Цитировать | Написать  
Как работать с группированными объектами Active-X
    #36601076
Фотография lopuxi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lopuxi
Участник
спасибо) теперь я наглядно вижу как работает frame на userforme
Остался один вопрос, если данный контейнер frame помещен не в UserForm а на листе Excel.
Он будет вообще там работать? или к нему нужно писать другой код?
...
Рейтинг: 0 / 0
27.04.2010, 16:34
| Ответить | Цитировать | Написать  
Как работать с группированными объектами Active-X
    #36601081
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Konst_One
Участник
работаь будет, но код писать надо в моделе соответствующего листа твоей книги
...
Рейтинг: 0 / 0
27.04.2010, 16:35
| Ответить | Цитировать | Написать  
Как работать с группированными объектами Active-X
    #36601085
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Konst_One
Участник
*модуле
...
Рейтинг: 0 / 0
27.04.2010, 16:35
| Ответить | Цитировать | Написать  
Как работать с группированными объектами Active-X
    #36601109
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Konst_One
Участник
стоп. Frame из UserForm напрямую в книгу не вставить, туда только ActiveX можно вставлять или стандартные контролы.

вам только UserForm доступен для такой работы.
...
Рейтинг: 0 / 0
27.04.2010, 16:41
| Ответить | Цитировать | Написать  
Как работать с группированными объектами Active-X
    #36601177
Фотография lopuxi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
lopuxi
Участник
Konst_Oneстоп. Frame из UserForm напрямую в книгу не вставить, туда только ActiveX можно вставлять или стандартные контролы.

вам только UserForm доступен для такой работы.

Ясно... Но в моей ситуации userform не удобна... У меня все на одном листе располагается.
Оставлю свой супер умный код какой есть тока добавлю ))
Код: plaintext
1.
2.
3.
Application.ScreenUpdating = False 

Application.ScreenUpdating = True
и нормально )) по ступенчатое пропадание кнопок решено ))
...
Рейтинг: 0 / 0
27.04.2010, 16:57
| Ответить | Цитировать | Написать  
24 сообщений из 24, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как работать с группированными объектами Active-X
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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