Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как работать с группированными объектами Active-X / 24 сообщений из 24, страница 1 из 1
27.04.2010, 14:08
    #36600648
lopuxi
lopuxi
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как работать с группированными объектами Active-X
Конечно не умру если не узнаю, но мне просто вдруг стало интересно, как узнать номер группы сгруппированных в одно целое несколько кнопок или других элементов и в дальнейшем работать с этой группой в коде.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

Я чето не так делаю. Давай может по порядку с простого.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.04.2010, 16:13
    #36601014
Konst_One
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как работать с группированными объектами Active-X
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:34
    #36601076
lopuxi
lopuxi
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как работать с группированными объектами Active-X
спасибо) теперь я наглядно вижу как работает frame на userforme
Остался один вопрос, если данный контейнер frame помещен не в UserForm а на листе Excel.
Он будет вообще там работать? или к нему нужно писать другой код?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.04.2010, 16:35
    #36601081
Konst_One
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как работать с группированными объектами Active-X
работаь будет, но код писать надо в моделе соответствующего листа твоей книги
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.04.2010, 16:35
    #36601085
Konst_One
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как работать с группированными объектами Active-X
*модуле
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.04.2010, 16:41
    #36601109
Konst_One
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как работать с группированными объектами Active-X
стоп. Frame из UserForm напрямую в книгу не вставить, туда только ActiveX можно вставлять или стандартные контролы.

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

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

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

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


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