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

Вход

Регистрация

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

 

= Мир MS Excel/Выдает ошибку при прогоне кода. - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, Manyasha, SLAVICK, китин  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Выдает ошибку при прогоне кода. (Формулы/Formulas)
Выдает ошибку при прогоне кода.
lomonos1917 Дата: Среда, 23.12.2020, 15:55 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 0 ±
Замечаний: 0% ±

Добрый день всем! Следующий вопрос по UserForm. Я совсем не профессионал в пользовательских формах, а делать надо. Задача следующая. Необходимо, чтобы значение в формате даты из Textbox переместилось в первую ячейку в конец умной таблицы. Есть следующий код. Что в нём не так?
[vba]
Код
Private Sub TextBox2_Change()
Dim n As Date
Set ЛистИсходник = ThisWorkbook.Worksheets("ИСХОДНИК")
Set ТаблицаИсходник = ЛистУчёт.ListObjects("Таблица1_tb")
Set ТаблицаИсходник = ЛистИсходник.ListObjects("ИСХОДНИК")
Set СтрокаИсходник = ТаблицаИсходник.ListRows.Add
СтрокаИсходник.Range(1) = Format(Дата_заказа, "ДД.ММ.ГГГГ")
End Sub
[/vba]


Сообщение отредактировал lomonos1917 - Среда, 23.12.2020, 16:53
 
Ответить
СообщениеДобрый день всем! Следующий вопрос по UserForm. Я совсем не профессионал в пользовательских формах, а делать надо. Задача следующая. Необходимо, чтобы значение в формате даты из Textbox переместилось в первую ячейку в конец умной таблицы. Есть следующий код. Что в нём не так?
[vba]
Код
Private Sub TextBox2_Change()
Dim n As Date
Set ЛистИсходник = ThisWorkbook.Worksheets("ИСХОДНИК")
Set ТаблицаИсходник = ЛистУчёт.ListObjects("Таблица1_tb")
Set ТаблицаИсходник = ЛистИсходник.ListObjects("ИСХОДНИК")
Set СтрокаИсходник = ТаблицаИсходник.ListRows.Add
СтрокаИсходник.Range(1) = Format(Дата_заказа, "ДД.ММ.ГГГГ")
End Sub
[/vba]

Автор - lomonos1917
Дата добавления - 23.12.2020 в 15:55
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Выдает ошибку при прогоне кода. (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

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