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

Вход

Регистрация

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

 

= Мир MS Excel/Дату из формы подставить в ячейку в формате дата. - Мир MS Excel

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

Excel 2010
Добрый день!
Все облазил, но так и не смог найти ответ на элементарный вопрос: как дату полученную в форме подставить в ячейку на лист в формате Дата.
У меня упорно вставляется в виде общего текста, а мне далее нужно проводить операции с датами на листе.
[vba]
Код

Me.TextBox001 = Format(Date, "dd.mm.yyyy")
Cells(iLastRow, 2) = Me.TextBox001
[/vba]
 
Ответить
СообщениеДобрый день!
Все облазил, но так и не смог найти ответ на элементарный вопрос: как дату полученную в форме подставить в ячейку на лист в формате Дата.
У меня упорно вставляется в виде общего текста, а мне далее нужно проводить операции с датами на листе.
[vba]
Код

Me.TextBox001 = Format(Date, "dd.mm.yyyy")
Cells(iLastRow, 2) = Me.TextBox001
[/vba]

Автор - Паштет
Дата добавления - 28.06.2017 в 13:11
buchlotnik Дата: Среда, 28.06.2017, 13:15 | Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3327
Репутация: 886 ±
Замечаний: 0% ±

2010, 2013, 2016 RUS / ENG
Дык так и вставлять [vba]
Код
Cells(iLastRow, 2) = Date
[/vba]
Цитата
упорно вставляется в виде общего текста
правильно, [vba]
Код
Format(Date, "dd.mm.yyyy")
[/vba] строку возвращает - проверьте [vba]
Код
MsgBox TypeName(Format(Date, "dd.mm.yyyy"))
[/vba]


каждому For - Next!
платная помощь:
ЯД: 410012595572239
buchlotnik@mail.ru


Сообщение отредактировал buchlotnik - Среда, 28.06.2017, 13:24
 
Ответить
СообщениеДык так и вставлять [vba]
Код
Cells(iLastRow, 2) = Date
[/vba]
Цитата
упорно вставляется в виде общего текста
правильно, [vba]
Код
Format(Date, "dd.mm.yyyy")
[/vba] строку возвращает - проверьте [vba]
Код
MsgBox TypeName(Format(Date, "dd.mm.yyyy"))
[/vba]

Автор - buchlotnik
Дата добавления - 28.06.2017 в 13:15
_Boroda_ Дата: Среда, 28.06.2017, 13:19 | Сообщение № 3
Группа: Модераторы
Ранг: Местный житель
Сообщений: 11647
Репутация: 4828 ±
Замечаний: 0% ±

2003; 2007; 2010; 2013 RUS
Вы про это?
[vba]
Код
Cells(1, 2) = CDate(Me.TextBox001)
[/vba]
К сообщению приложен файл: 57149896.xlsm(16Kb)


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеВы про это?
[vba]
Код
Cells(1, 2) = CDate(Me.TextBox001)
[/vba]

Автор - _Boroda_
Дата добавления - 28.06.2017 в 13:19
and_evg Дата: Среда, 28.06.2017, 13:21 | Сообщение № 4
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 229
Репутация: 39 ±
Замечаний: 0% ±

Excel 2007
А может так?
[vba]
Код
Cells(iLastRow, 2) = Format(Me.TextBox001, "dd.mm.yyyy")
[/vba]
 
Ответить
СообщениеА может так?
[vba]
Код
Cells(iLastRow, 2) = Format(Me.TextBox001, "dd.mm.yyyy")
[/vba]

Автор - and_evg
Дата добавления - 28.06.2017 в 13:21
Паштет Дата: Среда, 28.06.2017, 13:42 | Сообщение № 5
Группа: Пользователи
Ранг: Новичок
Сообщений: 28
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Цитата
Дык так и вставлять
[vba]
Код
Cells(iLastRow, 2) = Date
[/vba]

У меня с помощью счетчика текущая дата регулируется в этом textBox'e

_Boroda_, верно! То что надо. Спасибо большое!
 
Ответить
Сообщение
Цитата
Дык так и вставлять
[vba]
Код
Cells(iLastRow, 2) = Date
[/vba]

У меня с помощью счетчика текущая дата регулируется в этом textBox'e

_Boroda_, верно! То что надо. Спасибо большое!

Автор - Паштет
Дата добавления - 28.06.2017 в 13:42
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Дату из формы подставить в ячейку в формате дата. (Макросы/Sub)
Страница 1 из 11
Поиск:

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