Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Как свернуть форму в Екселе... / 6 сообщений из 6, страница 1 из 1
29.05.2008, 17:36
    #35343973
Piter_
Piter_
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как свернуть форму в Екселе...
Уважаемые, подскажите, как свернуть форму пользовательскую UserForm. Какое свойство формы отвечает за кнопочку "свернуть"...Или такого в VBA нет.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.05.2008, 20:39
    #35344414
KL (XL)
KL (XL)
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как свернуть форму в Екселе...
Думаю, что для свертывания наподобие окон придется использовать API, см. пример с кодом Стивена Буллена: http://www.oaltd.co.uk/DLCount/DLCount.asp?file=FormFun.zip

а так методы Hide и Show

KL
[MVP - Microsoft Excel]
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.05.2008, 09:26
    #35344819
Piter_
Piter_
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как свернуть форму в Екселе...
Неудобно очень. Получается - кнопка на панели с UserForm2.Show, работаем с формой, а когда надо перейти например на другой лист или загрузить другую книгу, то друрая кнопка UserForm2.Hide и т.д....
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.05.2008, 13:54
    #35345779
KL (XL)
KL (XL)
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как свернуть форму в Екселе...
Piter_Неудобно очень. Получается - кнопка на панели с UserForm2.Show, работаем с формой, а когда надо перейти например на другой лист или загрузить другую книгу, то друрая кнопка UserForm2.Hide и т.д....

Ну так юзай функции API из файла Стивена Буллена - там есть все, что тебе нужно.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Период между сообщениями больше года.
06.06.2011, 18:28
    #37297459
rubberman
rubberman
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как свернуть форму в Екселе...
Доброго дня всем!

KL (XL) - спасибо за ссылку на файл Стивена Буллена. Наконец то подогнал свою форму под стили.

У меня только не получается прописать ярлык на картинку, вместо загрузки файла иконки.

В форме планирую использовать только 1 иконку, без возможности её замены.
Саму картинку иконки в битовом формате поместил в UserForm. Её расположение - Me.Image1

Процедура отвечающая за инициализацию UserForm выглядит так:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
Private Sub UserForm_Activate()

    Set mclsFormChanger = New CFormChanger

    mclsFormChanger.Modal = True
    mclsFormChanger.ShowCaption = True
    mclsFormChanger.ShowCloseBtn = True
    mclsFormChanger.ShowTaskBarIcon = True
    mclsFormChanger.ShowIcon = True
    mclsFormChanger.ShowMaximizeBtn = False
    mclsFormChanger.ShowMinimizeBtn = True
    mclsFormChanger.Sizeable = False
    mclsFormChanger.ShowSysMenu = True
    mclsFormChanger.SmallCaption = False

    Set mclsFormChanger.Form = Me

End Sub

Как и какую процедуру заставить брать рисунок Image1 из UserForm и использовать его в качестве иконки?

Помогите, плиз, очень нужно!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.06.2011, 18:36
    #37297473
rubberman
rubberman
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как свернуть форму в Екселе...
rubberman,

Прикрепляю файл
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Как свернуть форму в Екселе... / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 413ms
Закрыть
start [/forum/topic.php?fid=61&tablet=1&tid=2176800]:
 0ms
get settings:
 7ms
get forum list:
 11ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 137ms
get topic data:
 7ms
get forum data:
 2ms
get page messages:
 27ms
get tp. blocked users:
 1ms
others: 217ms
total:  413ms
x
x
Закрыть


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