Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Выделение диапазона мышкой во время работы макроса - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
Страница 1 из 11
Модератор форума: _Boroda_, Pelena, Manyasha, SLAVICK 
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Выделение диапазона мышкой во время работы макроса (Макросы/Sub)
Выделение диапазона мышкой во время работы макроса
fairylive Дата: Четверг, 16.06.2016, 12:12 | Сообщение № 1
Группа: Пользователи
Ранг: Участник
Сообщений: 87
Репутация: 3 ±
Замечаний: 0% ±

Excel 2016
Есть код в котором сейчас диапазон предлагается ввести через диалоговое окно. Но для этого надо сначала открыть файл, записать адреса начальной и конечной ячейки в нужном диапазоне, закрыть файл, запустить макрос и там ввести адрес диапазона. Хочется это дело упростить. Как можно в момент работы макроса указать нужный диапазон мышкой?
 
Ответить
СообщениеЕсть код в котором сейчас диапазон предлагается ввести через диалоговое окно. Но для этого надо сначала открыть файл, записать адреса начальной и конечной ячейки в нужном диапазоне, закрыть файл, запустить макрос и там ввести адрес диапазона. Хочется это дело упростить. Как можно в момент работы макроса указать нужный диапазон мышкой?

Автор - fairylive
Дата добавления - 16.06.2016 в 12:12
_Boroda_ Дата: Четверг, 16.06.2016, 12:15 | Сообщение № 2
Группа: Модераторы
Ранг: Экселист
Сообщений: 9348
Репутация: 3922 ±
Замечаний: 0% ±

2003; 2007; 2010; 2013 RUS
Посмотрите вот здесь
http://www.excelworld.ru/forum/10-24544-1


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеПосмотрите вот здесь
http://www.excelworld.ru/forum/10-24544-1

Автор - _Boroda_
Дата добавления - 16.06.2016 в 12:15
fairylive Дата: Четверг, 16.06.2016, 12:34 | Сообщение № 3
Группа: Пользователи
Ранг: Участник
Сообщений: 87
Репутация: 3 ±
Замечаний: 0% ±

Excel 2016
_Boroda_, ну там моя тема, только вопрос про мышь остался открытым. Создал новую тему так как в той теме был другой вопрос. Но диалоговое окно application.inputbox не позволяет выделять что-то мышкой.
 
Ответить
Сообщение_Boroda_, ну там моя тема, только вопрос про мышь остался открытым. Создал новую тему так как в той теме был другой вопрос. Но диалоговое окно application.inputbox не позволяет выделять что-то мышкой.

Автор - fairylive
Дата добавления - 16.06.2016 в 12:34
Manyasha Дата: Четверг, 16.06.2016, 12:43 | Сообщение № 4
Группа: Модераторы
Ранг: Старожил
Сообщений: 1586
Репутация: 661 ±
Замечаний: 0% ±

Excel 2007, 2010
fairylive, взяла код Ярослава из прошлой темы, у меня все выделяется.
[vba]
Код
Sub test()
    Set diapazon = Application.InputBox("Укажите диапазон объединяемых ячеек." & vbLf & _
                        "Например F7:F57", "Какие ячейки объединять?", Type:=8)
    MsgBox "Вы выделили " & diapazon.Address
End Sub
[/vba]
К сообщению приложен файл: primer.xlsm(14Kb)


marinamorozova_box@mail.ru
ЯД: 410013299366744 WM: R193491431804
 
Ответить
Сообщениеfairylive, взяла код Ярослава из прошлой темы, у меня все выделяется.
[vba]
Код
Sub test()
    Set diapazon = Application.InputBox("Укажите диапазон объединяемых ячеек." & vbLf & _
                        "Например F7:F57", "Какие ячейки объединять?", Type:=8)
    MsgBox "Вы выделили " & diapazon.Address
End Sub
[/vba]

Автор - Manyasha
Дата добавления - 16.06.2016 в 12:43
fairylive Дата: Четверг, 16.06.2016, 12:47 | Сообщение № 5
Группа: Пользователи
Ранг: Участник
Сообщений: 87
Репутация: 3 ±
Замечаний: 0% ±

Excel 2016
Manyasha, да работает. Может дело в том что у меня в начале стоит вот это:
[vba]
Код
With Application: .DisplayAlerts = False: .ScreenUpdating = False: End With
[/vba]?

UPD Перевёл [vba]
Код
ScreenUpdating = True
[/vba] и стало выделяться мышкой!

Спасибо всем!


Сообщение отредактировал fairylive - Четверг, 16.06.2016, 12:52
 
Ответить
СообщениеManyasha, да работает. Может дело в том что у меня в начале стоит вот это:
[vba]
Код
With Application: .DisplayAlerts = False: .ScreenUpdating = False: End With
[/vba]?

UPD Перевёл [vba]
Код
ScreenUpdating = True
[/vba] и стало выделяться мышкой!

Спасибо всем!

Автор - fairylive
Дата добавления - 16.06.2016 в 12:47
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Выделение диапазона мышкой во время работы макроса (Макросы/Sub)
Страница 1 из 11
Поиск:

Яндекс цитирования
© 2010-2016 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!