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

Вход

Регистрация

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

 

= Мир MS Excel/Запрет перемещения ActiveX.Label - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Запрет перемещения ActiveX.Label (Макросы/Sub)
Запрет перемещения ActiveX.Label
Serg17 Дата: Среда, 21.05.2014, 22:01 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 5
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Добрый день, уважаемые корифеи!
При создании приложения для малоопытных пользователей малоопытным программистом возникли следующие сложности:
Цель: комфортное редактирование текста в элементе управления.
Проблема: при нажатии на область с элементом "Label" происходит выделение объекта с возможностью перетаскивания/ изменения объекта, что вызывает дискомфорт и страх у пользователя.
Вопрос: как программно запретить выделять/перетаскивать/изменять размеры элемента управления ActiveX.Label (если этот не подходит для таких целей, прошу предложить иной), с сохранением ф-ии перезаписи содержимого с клавиатуры
 
Ответить
СообщениеДобрый день, уважаемые корифеи!
При создании приложения для малоопытных пользователей малоопытным программистом возникли следующие сложности:
Цель: комфортное редактирование текста в элементе управления.
Проблема: при нажатии на область с элементом "Label" происходит выделение объекта с возможностью перетаскивания/ изменения объекта, что вызывает дискомфорт и страх у пользователя.
Вопрос: как программно запретить выделять/перетаскивать/изменять размеры элемента управления ActiveX.Label (если этот не подходит для таких целей, прошу предложить иной), с сохранением ф-ии перезаписи содержимого с клавиатуры

Автор - Serg17
Дата добавления - 21.05.2014 в 22:01
Serg17 Дата: Четверг, 22.05.2014, 08:52 | Сообщение № 2
Группа: Пользователи
Ранг: Прохожий
Сообщений: 5
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Прикладываю пример:

Sub AddLabel()
'Создаем метку
With ActiveWorkbook.ActiveSheet.Labels.Add(200, 20, 20, 20)
'Устанавливаем свойства
.Text = 0

End With
End Sub

Вопрос в том, что и как нужно прописать в свойствах, чтобы метку нельзя было перемещать, но можно было редактировать текст в ней.
[moder]То есть, Вы хотите, чтобы мы у себя в книге создали форму, прописали к ней Ваш макрос и потом уже начали думать, что же там не так, да? Правила форума читайте. Там четко прописано, что должно быть в вопросе.
 
Ответить
СообщениеПрикладываю пример:

Sub AddLabel()
'Создаем метку
With ActiveWorkbook.ActiveSheet.Labels.Add(200, 20, 20, 20)
'Устанавливаем свойства
.Text = 0

End With
End Sub

Вопрос в том, что и как нужно прописать в свойствах, чтобы метку нельзя было перемещать, но можно было редактировать текст в ней.
[moder]То есть, Вы хотите, чтобы мы у себя в книге создали форму, прописали к ней Ваш макрос и потом уже начали думать, что же там не так, да? Правила форума читайте. Там четко прописано, что должно быть в вопросе.

Автор - Serg17
Дата добавления - 22.05.2014 в 08:52
Serg17 Дата: Четверг, 22.05.2014, 14:01 | Сообщение № 3
Группа: Пользователи
Ранг: Прохожий
Сообщений: 5
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Прилагаю пример.
К сообщению приложен файл: 4046327.xls (31.0 Kb)
 
Ответить
СообщениеПрилагаю пример.

Автор - Serg17
Дата добавления - 22.05.2014 в 14:01
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Запрет перемещения ActiveX.Label (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

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