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

Вход

Регистрация

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

 

= Мир MS Excel/Использовать UserForm вместо InputBox - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, Manyasha, SLAVICK, китин  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Использовать UserForm вместо InputBox (Макросы/Sub)
Использовать UserForm вместо InputBox
Sobirjon Дата: Понедельник, 15.06.2020, 11:38 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 140
Репутация: 2 ±
Замечаний: 0% ±

2016
Доброго времени суток!
Имеется замечательный календар от сюда
Возможно ли присвоить переменной выбранную дату из Userform по аналогии InputBox
внутри макроса в модуле?
т.е
[vba]
Код
Function Test()
    Dim dtDate As Date
    dtDate=UserForm
End Function
[/vba]


Сообщение отредактировал Sobirjon - Понедельник, 15.06.2020, 11:39
 
Ответить
СообщениеДоброго времени суток!
Имеется замечательный календар от сюда
Возможно ли присвоить переменной выбранную дату из Userform по аналогии InputBox
внутри макроса в модуле?
т.е
[vba]
Код
Function Test()
    Dim dtDate As Date
    dtDate=UserForm
End Function
[/vba]

Автор - Sobirjon
Дата добавления - 15.06.2020 в 11:38
Sobirjon Дата: Понедельник, 15.06.2020, 12:01 | Сообщение № 2
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 140
Репутация: 2 ±
Замечаний: 0% ±

2016
Вопрос закрыть, решил с присвоением в глобальной переменной выбранное значение :ok:
[vba]
Код
Option Explicit

Public SelectedDate As Date 'Переменная в которой храниться выбранная дата
Function test_01() As Date
    Calendar.Show
    test_01 = SelectedDate
End Function
[/vba]


Сообщение отредактировал Sobirjon - Понедельник, 15.06.2020, 12:02
 
Ответить
СообщениеВопрос закрыть, решил с присвоением в глобальной переменной выбранное значение :ok:
[vba]
Код
Option Explicit

Public SelectedDate As Date 'Переменная в которой храниться выбранная дата
Function test_01() As Date
    Calendar.Show
    test_01 = SelectedDate
End Function
[/vba]

Автор - Sobirjon
Дата добавления - 15.06.2020 в 12:01
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Использовать UserForm вместо InputBox (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

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