![]() |
|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Форумчанин
Регистрация: 09.05.2009
Сообщений: 370
|
![]()
Всем здрасти. Во вложенной книге после нажатия на кнопку "рука" ("Вкл. таскать"), можно переносить значения из заполненной ячейки в пустую. Хотелось бы, чтобы сообщения "Хватай" и "Вставляй XX" вели себя, как ведут себя панели инструментов в поле (их можно двигать мышкой, при прокрутке они не двигаются).
P.S. Пробовал сделать панель инструментов, но не знаю, как создавать кнопки с надписями. Может есть, вариант кроме CommandBars. |
![]() |
![]() |
![]() |
#2 |
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,858
|
![]()
В коде слишком много лишнего... так и не разобрался, что и как работает.
Зато теперь информация выводится на ту же панель инструментов. Проверяйте: http://excelvba.ru/XL_Files/Sample__...__20-49-01.zip |
![]() |
![]() |
![]() |
#3 |
Форумчанин
Регистрация: 09.05.2009
Сообщений: 370
|
![]()
Всем здрасти.
EducatedFool, сначала было больше возможностей, я их удалил, но остался мусор. (Сейчас осталось убрать в "Таскать1" arr из Public Вкл As Boolean, xx, arr(), удаляю, перестаёт работать). 1) Как отменить закрытие книги, если xx<>0? Sub Выкл_таскать() If xx <> 0 Then GoTo c Вкл = False Exit Sub c: Отменить закрытие книги MsgBox "Вставляй " & xx End Sub 2) Как сделать, чтобы это всё работало во всех открытых книгах? 3) Как сделать из этого надстройку? Последний раз редактировалось agregator; 11.02.2010 в 14:29. |
![]() |
![]() |
![]() |
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Сообщение | HellMercenariess | Свободное общение | 1 | 21.11.2009 04:42 |
Сообщение... | KoBRaAndrey | Общие вопросы Delphi | 8 | 02.10.2009 18:56 |
Сообщение | Shevali | Общие вопросы Delphi | 3 | 07.06.2009 19:53 |
Плавающее окошко | Маркъ | Общие вопросы Delphi | 2 | 02.04.2007 18:42 |