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

Вход

Регистрация

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

 

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

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Выделение диапазона мышкой во время работы макроса (Макросы/Sub)
Выделение диапазона мышкой во время работы макроса
fairylive Дата: Четверг, 16.06.2016, 12:12 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 122
Репутация: 4 ±
Замечаний: 0% ±

Excel 2016
Есть код в котором сейчас диапазон предлагается ввести через диалоговое окно. Но для этого надо сначала открыть файл, записать адреса начальной и конечной ячейки в нужном диапазоне, закрыть файл, запустить макрос и там ввести адрес диапазона. Хочется это дело упростить. Как можно в момент работы макроса указать нужный диапазон мышкой?
 
Ответить
СообщениеЕсть код в котором сейчас диапазон предлагается ввести через диалоговое окно. Но для этого надо сначала открыть файл, записать адреса начальной и конечной ячейки в нужном диапазоне, закрыть файл, запустить макрос и там ввести адрес диапазона. Хочется это дело упростить. Как можно в момент работы макроса указать нужный диапазон мышкой?
Автор - fairylive
Дата добавления - 16.06.2016 в 12:12
_Boroda_ Дата: Четверг, 16.06.2016, 12:15 | Сообщение № 2
Группа: Модераторы
Ранг: Местный житель
Сообщений: 16675
Репутация: 6481 ±
Замечаний: 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
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 122
Репутация: 4 ±
Замечаний: 0% ±

Excel 2016
_Boroda_, ну там моя тема, только вопрос про мышь остался открытым. Создал новую тему так как в той теме был другой вопрос. Но диалоговое окно application.inputbox не позволяет выделять что-то мышкой.
 
Ответить
Сообщение_Boroda_, ну там моя тема, только вопрос про мышь остался открытым. Создал новую тему так как в той теме был другой вопрос. Но диалоговое окно application.inputbox не позволяет выделять что-то мышкой.
Автор - fairylive
Дата добавления - 16.06.2016 в 12:34
Manyasha Дата: Четверг, 16.06.2016, 12:43 | Сообщение № 4
Группа: Модераторы
Ранг: Старожил
Сообщений: 2198
Репутация: 898 ±
Замечаний: 0% ±

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

ЯД: 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
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 122
Репутация: 4 ±
Замечаний: 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 из 1
  • 1
Поиск:

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